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Preface 



Purpose of This Manual 

The Sort Reference Manual is written to familiarize readers 
with the types of sort that can be run on the System/32, 
and to serve as a reference for the programmer who must 
define and run sort programs. Use this manual to: 

• Identify and select the type of sort needed 

• Complete sequence specifications sheets 

• Supply OCL and sequence specifications when using 
your own procedures 

• Optimize sort run time 
Audience 

The primary audience for the Sort Reference Manual is 
the account programmer. The secondary audience includes 
third party programmers and IBM field support personnel 
(SE, PSR, PSCE, and instructor). 



How This Manual is Organized 

This publication contains the following six levels of 
information. 

1 . Sequence Specifications Overview shows which col- 
umns on the sequence specifications sheet you must 
consider when you want to sort a file. 

2. Column Summaries list the possible entries for each 
column on the sequence specification sheet. 

3. Column Descriptions explain the possible entries for 



5. Performance Considerations explains the various 
factors that affect the time required to run a sort job. 

6. Sample Jobs show how to fill out the sequence 
specifications sheets for typical jobs. 



each column in greater detail. 

4. How to Run Sort shows how to enter OCL 
statements to load and execute a sort job. 
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Here is how to use each level: 

• Use the Overview in Chapter 1 to see which columns 
on the sequence specifications sheet you must consider 
when you want to sort a file. 

• Use the Column Summaries at the beginning of Chapters 
2 through 4 for a quick recall of the possible entries for 
each column on the sequence specifications sheet. 

• Use the Column Descriptions in Chapters 2 through 4 
when you need a detailed explanation of the entries 
for a particular column. 

• Use How to Run Sort in Chapter 5 to set up your files 
and specify what you want done with the information 
in the files. 

• Use the Performance Considerations in Chapter 6 for 
the most efficient method to run your sort job. 

• Use the Sample Jobs in Chapter 7 to review coding 
techniques for actual jobs. 

Column summaries and column descriptions are provided 
for each type of specification: 



System Requirements 

The Sort portion of the IBM System/32 Utilities Program 
Product runs on all models of the System/32 and supports 
all available features. 



Related System/32 Publications 

• IBM System/32 Introduction, GC21 -7852 

• IBM System/32 System Control Programming Reference 
Manual, GC2 1-7593 

• IBM System/32 Utilities Program Product Reference 
Manual- Data File Utility, SC2 1-7600 

• IBM System/32 Displayed Messages Guide, GC2 1 -7704 

Titles and abstracts of other related publications are listed 
in the IBM System/32 Bibliography, GC20-0032. 



• Header 

• Record type 



• Field description 
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Chapter 1 . Overview of Sort 



The sort program is part of the System/32 Utilities Program 
Product. You can use the sort program to rearrange, drop, 
and reformat records in your file. 



SORT FUNCTIONS 

The three basic functions of sort are: 
• To rearrange the records in a file. 





• To drop records from a file. 




• To reformat the records in a file. 



9 aaa zx 



7 aaa zx 



3 aaa zx 



2 aaa zx 



1 aaa zx 




Sort 



zx 9 aaa 



zx 7 aaa 



zx 3 aaa 



zx 2 aaa 



zx 1 aaa 
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TYPES OF SORT: ADDROUT, TAGALONG, AND 
SUMMARY TAGALONG 



The three types of sort jobs are: addrout (address out); 
tagalong (specified data fields can be included with control 
fields in the sorted records); and summary tagalong 
(a total or totals are accumulated in the sorted records). 



Addrout Sort 



The output from an addrout sort job consists of 3-byte 
hexadecimal relative record numbers of some or all of the 
records in the input file, as follows: 



3-Byte Relative Record Numbers 
Control Fields 

/Data Fields 
/ 



Input 



Employee Master File 
(presequenced in this 
example) 



00 00 02 
00 00 01 



00 00 00 116 $4.00 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



Process 



Sort 



Omitting records where amount is less than $3.00 



Output 



Relative Record 
Numbers Only 



00 00 07 
00 00 05 
00 00 03 
00 00 01 
00 00 00 
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Tagatong Sort 



The output from a tagalong sort is a file of sorted records 
which can contain: 

• Control fields only 

• Data fields only 

• Control fields and data fields 
A tagalong sort works as follows: 



Input 



Employee Master File 
(presequenced in this 
example) 



3-Byte Relative Record Numbers 
Control Fields 

/Data Fields 
/ 



00 00 02 
00 00 01 



00 00 00 116 $4.00 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



Process 



Sort 



Output 



Omitting records where amount is less than $3.00 




Control Fields and 
Data Fields 



Control Fields Only Data Fields Only 



Tagalong Sorts 
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Summary Tagalong Sort 

The output from a summary tagalong sort is a file of sorted 
summary records that usually contains: 

• Control fields only 

• Summary fields only 

• Control fields and summary fields 



Summary sort output can also include data fields. However, 
you cannot determine which input record's data field will 
appear in the summary record. 

A summary tagalong sort that sorts only on the first two 
digits of the control field works as follows (note the 
summarizing that occurs in the data fields that have a 17 in 
the control field): 



Input 



Process 



Output 



Employee Master File 
(presequenced in this 
example) 



17 $7.50 



16 $3.15 



15 $3.00 



1 1 $4.00 



3-Byte Relative Record Numbers 
Control Fields 

/Data Fields 
/ 



00 00 02 
00 00 01 



00 00 07 
00 00 06 
00 00 05 
00 00 04 
00 00 03 



175 $3.50 



174 $2.25 



171 $4.00 



170 $2.50 



167 $3.15 



162 $2.75 



150 $3.00 



116 


$4.00 






Sort 




Omitting records where amount is less than $3.00 




Control Fields and 
Summary Fields 



Control Fields Only 



Summary Fields Only 



Summary Tagalong Sorts 
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HOW SORT WORKS 



The input needed to run a sort job is: an input file to be 
sorted; sequence specifications; and operation control 
language (OCL) statements. Sort works as follows: 



INPUT 



© OCL 

Statements 



© Sequence 
Specifications 



© File To Be 
Sorted 



PROCESSING 



Sort 




© Work File 




-< 



OUTPUT 



© Sorted File 



© OCL Statements are your instructions to the system. 

© Sequence Specifications are your instructions to the 
sort program. 

© File to be Sorted can be an indexed, sequential, or 
direct disk file with fixed length records, but sort 
processes each sequentially. 

© Work File is a work area on disk where sort writes all 
of the records you want to sort. The program can 
then work with the records in the work area without 
disturbing the input file. 

© Sorted File can contain: 

• The relative record numbers of the records in the 
input file. 

• All or part of the records contained in the input 
file. 

• Summarized fields for each record type in the 
input file. 



Sort Sequence Specifications 

You must always specify how you want a file sorted. You 
use sequence specifications to describe the type of sort you 
want, which records you want to sort, and how you want 
the records sorted. Sequence specifications can be stored as 
a source member or within a procedure member in the 
library; these specifications can also be entered through the 
keyboard. See Chapter 5, How to Run Sort for a detailed 
description of how to supply sequence specifications for 
your sort job. 



Sequence Specifications Sheet 

The sequence specifications sheet contains three different 
kinds of specifications: header specification, record type 
specifications, and field specifications. The sample sequence 
specifications sheet shows the location and purpose of all 
three: 



IBM 



Card: MATCH, 
SORT, SELECT, 
MERGE 



in bytes) 

<f Control Field 
Lengths for Any 
Record Type 



SEQUENCE SPECIFICATIONS 
Header 



.m 



CCP/Oisk Sort Only 



Record Type 



Field 



Line 




| - Continuation (A/O/'ll 


| » C/Z/D/P/U I 




Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 


| » Type (1/01 


«» Stacker Select 

s a 


ion 

To 


IS F/C/K 


« Keywo 


d— H 

1 

To 1 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 


- ~i 

Record ' 
Name | 


0 


1 






































































































































0 


2 






































































































































.0 


3 






































































































































0 








































































































































0 


5 






































































































































0 


6 




















































































...L 



















































Here you specify the 
} type of sort job you 
will run. 



Here you specify which 
input file records you 
will sort. 



Line 
















Comments 
















S 














Number 


Type 


Type (N/O/F/D/! 


s 


Loca 
From 


To 


i 
1 


Substitute Charat 




Overflow 

Field 

Length 




Rese 


ved 




Field 1 






























63 


64 




72 


0 


7 










































































































































S 








































































































































0 


9 
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3 



















































































































































































































































































Here you specify how 
you want the records 
sorted and formatted. 
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Sort Execution 

You can create your own procedure member to execute 
sort. This procedure member is stored in the library. The 
contents of a procedure member that contains your OCL 
are explained in Chapter 5, How to Run Sort. 

You can include sequence specifications in a procedure 
member (following the RUN statement), or you can access 
the source member that contains your sequence specifica- 
tions through use of the SOURCE statement. See Source 
Member Information Needed When Using User-Supplied 
Sort Procedures in Chapter 5. 

The DFU SORT command can also be used to execute 
sort without providing OCL statements. This command 
is described in Appendix D of \Jne IBM System/32 
Utilities Program Product Reference Manual— Data File 
Utility, SC21 -7600. 



Sort Operation 

Sort works with the records in your file as follows: 
1 . Sort reads a record from the input file. 



r 5 


6 26 


27 30 








Control Field A 


Data y\ 


Control Field B 



Note: Control fields are the fields you want the sort 
program to use to sort the records. See Column 7 
under Column Descriptions in Chapter 4 for a 
detailed discussion of control fields. 



3. If the record is one you want to sort, sort builds a 
work record, formatting it according to your field 
specifications. (The format of the work record is 
important because it controls the format of the 
output record.) 

Assume that your field specifications say: 

a. Put the contents of positions 27 through 30 in 
the input record into positions 1 through 4 of the 
work record. 

b. Put the contents of positions 1 through 5 in 

the input record into positions 5 through 9 of the 
work record. 

c. Put the contents of positions 6 through 26 in 
the input record into positions 10 through 30 of 
the work record. 

The work record sort builds would look like this: 



1 4 


5 9 


10 30 








Control Field B 


Control Field A 


Data \\ 



See Column 7 under Column Descriptions in 
Chapter 4 for a more detailed discussion of the work 
record. 

If you do not drop control fields, they will always 
precede data fields in the work and output records. 
(See Column 28 under Column Descriptions in 
Chapter 2 for a discussion of how to drop control 
fields.) 

4. Sort writes all of the input records you want to sort 
into the work file. 



2. Sort checks your record type specifications to see 
whether the record is one you want to sort. 
(Often you may not want to sort all of the records 
in the file.) 



5. Sort checks your header and field specifications to 
see how you want to arrange the records in the 
output file. (You arrange the records in ascending or 
descending order by control fields.) 



6. Sort writes the records into the output file in the 
order you have specified. 
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OVERVIEW OF SEQUENCE SPECIFICATIONS 



Order of Sequence Specifications 

The normal order of sequence specifications is: 

1. Header line 

2. Record type lines 

3. Field lines 

This order can vary, however, depending on how many 
records you want to sort and the format of those records. 
(Format refers to the locations, lengths, and types of 
fields in a record.) If, for example, you want to sort all of 
the records in a file— and they all have the same 
format— you do not have to fill out record type specifica- 
tions. (Not filling out record type specifications is often 
referred to as an implied include-all.) 



Number of Records 


Format of Records 








to be Sorted 


to be Sorted 


Order of Sequence Specifications 


All of the records 


All the same 


1. 


Header line 




in the file 


format 


2. 


Field lines 




(implied include-all) 










Some of the 


All the same 


1. 


Header line 




records in the file 


format 


2. 


Record type lines 








3. 


Field lines 




All or some of 


Several 


1. 


Header line Y 


For first type 


the records in 


different 


2. 


Record type lines > 


of record 


the file 


formats 


3. 


Field lines ) 


format 






4. 


Record type lines ) 


For second type 






5. 


Field lines f 


of record format 






6. 


Record type lines ) 


One set for each additional 






7. 


Field lines J 


type of record format 1 


4 This does not mean that the records in the file must be grouped by format type. The sequence specifications must be 


grouped (one set of record type and field lines for each format type). The records themselves can be in any order. 



For detailed information on how to include or omit certain 
records when you are sorting a file, see Column 6 under 
Column Descriptions in Chapter 3. 
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Specification Columns to Consider for Addrout Sort 
(SORTA) 

The shaded columns are the ones you must consider for an 
addrout sort job. 



Control field and 
sequence information 




Page sequence 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



[ I I Program r 
3 1 identification I 



GX21 -9089-3 
Primed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select ~ 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



5] Record 
£-1 Length 



Record Type 



>7 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 



Format for sorted file 



Location 
From 

' jlO 11 12 13 14 15 16 



Factor 2 (Field, Constant, or Keyword) 



From 
20 21 22 23 



Location | 
To I 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 



Record 




Comparison of an input record field and a constant 



I I Comparison of two input record fields 

1~t- 



Comparison of an input record field and the 
program date 



Field 



Line 


s 

g 

7 


|oo (C/Z/D/P/U/V) | 




Forced 


Overflow 

Field 

Length 




Comments 


Number 

3 4 5 


r- 

6 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


Record Character | 


oo Substitute Character j 


[Continuation | 


Reserved 




Field 1 
Name 1 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 




38 39 


H 
































Definition of normal control fields 






































































0 


8 




F 




























































































































0 
1 
1 


9 
? 
1 




F 








































+ 




















































































t» 
F 


























Definition of opposite control fields I 




































































































































































1 


2 




F 




























































































































1 


3 




* 


F 






























Definition of forced control fields 
































































1 


4 




F 
































1 II 1 1 1 1 11 I 1 1 1 1 1 1 1 1 
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Specification Columns to Consider for Tagalong Sort 
(SORTR) 

The shaded columns are the ones you must consider for a 
tagalong sort job. 



Control field and 
sequence information 




Page sequence 



] nternational Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



, rn 



Program 
Identification L 



GX21 9089-3 
Printed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR, 
SORTA, SORTRS 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select 



Output 
Record 
Length 

29 30 31 32 



CCP/Disk Sort Only 



yj Record 
£| Length 



Record Type 



Format for sorted file 



61 62 63 64 65 66 67 68 69 70 71 72 



From To 

0 11 12 13 14 15 16 



Factor 2 (Field, Constant, or Keyword) 



20 21 22 23 



Location I 
To I 

24 25 26 27 1 28 29 30 31 32 33 34 35 36 37 38 39 



Record I 
Name I 




Comparison of an input record field and a constant 



Comparison of two input record fields 



Comparison of an input record field and the 
program date 



Field 



Line 


Q 

3 

Z 

7 


D 
Q 
O 

8 




Forced 


Overflow 

Field 

Length 

20 21 22 




Number 

3 4 5 


6 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


i ^. Record Character J 


£ Substitute Character j 


lEo Continuation | 


Reserved 
23 24 25 26 27 28 29 


0 


7 






M 






































r-U 






























0 


8 




F 
















































'a 


& 




J* 


0 








































































1 


0 




F 
















































i 


» 




'* 


P 


































































1 


2 




F 
















































J 


3 




F 


D 








































































i 


4 




F 

















































Field I 
Name | 

i 



Definition of normal control fields 
Definition of opposite control fields 
Definition of forced control fields 
Definition of data fields 



53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 
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Page of SC2 1-7633-2 
Issued 30 May 1980 
ByTNL: SN2 1-8090 



Specification Columns to Consider for Summary Tagalong 
Sort (SORTRS) 

The shaded columns are the ones you must consider for a 
summary Tagalong sort job. 




Overview of Sort 1 1 
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Chapter 2. Header Specifications 



Only one header specification line is used for each sort 
job. Possible column entries, summarized on this page and 
in Appendix C for quick reference, are explained in detail 
later in this chapter. 



HEADER SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


000 


Header line number. 


6 


H 


Header line identification. 


712 


SORTA 


Addrout sort job, 


SORTR 


Tagalong sort job. 


SORTRS 


Summary tagalong sort job. 


13*17" ' 


1-256 


Largest sum (in bytes) of control field lengths for any record type. 


18 


A 


Records in sorted file to be in ascending order by control fields. 


D 


Records in sorted file to be in descending order by control fields. 


S 


Not used in System/32 sort jobs. 


19-25 


Blank 


Not used in System/32 sort jobs. 


26 


Blank 


Use standard collating sequence in compare operations. 


S 


Use an alternate collating sequence in compare operations. ALTSEQ 
statements will define the collating sequence to be used. 


Z. 1 


u or DianK 


Print: Sequence specifications. 
Diagnostic messages. 
Program-status messages. 
Action messages. 
Formatted messages. 


1 


Print: Program-status messages. 
Action messages. 
Formatted messages. 


2 


Print: Action messages. 

Formatted messages. 


3 


Print nothing (except formatted messages). 


28 


Blank 


Keep control fields in output records in tagalong sort jobs. 


X 


Drop control fields from output records in tagalong sort jobs. 




1-4096 


Length (in bytes) of output records in tagalong sort jobs. 


33 


Blank 


Not used in System/32 sort jobs. 


34 


N 


Data written on the work file will not be verified. 


Blank or character 
other than N 


Data written on the work file will be verified. 


35 


Blank 


Reserved for system use. 


36 


Blank 


Operator message SORT-7724 will be issued. 


N 


Operator message SORT-7724 will not be issued. 


37-39 


Blank 


Not used in System/32 sort jobs. 


40-72 


Any characters 


Comments. 




W/tWM 


Columns that must be filled in for all sort jobs. 
Columns that must be filled in for a tagalong sort. 
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COLUMN DESCRIPTIONS 

Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number (columns 
3 through 5) form a 5-digit sequence number. As the sort 
program reads sequence specifications, it checks the 
sequence numbers to make sure they are not in descending 
order. If the numbers are in descending order (if page 02 
specifications come before page 01 specifications, for 
example) and specifications are being issued the sort 
program places a warning (the letter S) next to the line. 
(The S stands for sequence error.) After issuing a warning 
the program continues reading the rest of the specification 
lines and then issues a message and waits for further 
instructions from the operator. The operator can either 
continue or end the job. 

Because page number applies to all lines on a page, columns 
1 and 2 appear only once, in the upper right corner of the 
page. You number the pages in ascending order. 

The line number of the header line is always 000 and is 
preprinted on the coding sheet. 

Column 6 (Line Type) 

Column 6 of the header line contains a preprinted H to 
identify the line as a header line. 



Columns 7-12 (Job) 

Columns 7 through 12 tell the program what type of sort 
job you want to do. SORTA means addrout sort. SORTR 
means tagalong sort. SORTRS means summary tagalong 
sort. 



Columns 13-17 (Largest Sum (in bytes) of Control Field 
Lengths for Any Record Type) 

To calculate this entry: 

1. Add together the lengths of the control fields (N, O, 
and F in column 7 of field specifications) for each 
type of input record. 

2. Enter the largest of these totals in columns 

13 through 17. (The total must not exceed 256.) 

For more information, see Control Fields, Column 7 
under Column Descriptions in Chapter 4. 



Column 18 (Ascending or Descending Sequence) 

Control fields control the sequence of records in the sorted 
output file. Your column 18 entry indicates the sequence 
in which you want the records sorted. 



Column 18 
Entry 


Sequence 


A 


Ascending sequence 




by control field 


D 


Descending sequence 




by control field 


S 


Not used in System/32 




sort jobs 



Column 26 (Collating Sequence) 

Column 26 specifies the collating sequence you want sort 
to use in compare operations. (Compare operations deter- 
mine whether one character is equal to, greater than, or less 
than another character.) 



Standard Collating Sequence 

No entry in column 26 tells the sort program to use the 
standard collating sequence. There are slight variations in 
the standard collating sequence, depending on whether you 
are using both the zone and digit portions of the characters 
in your records, the zone portions only, or the digit 
portions only. Appendix B shows the complete collating 
sequence of each situation. 

Alternate Collating Sequence 

An S in column 26 tells the program you want to change 
the standard collating sequence. To do this you must 
supply ALTSEQ statements immediately following the 
header specifications. (Appendix B explains how to code 
ALTSEQ statements.) 

Note: Do not use a packed or unpacked factor in an 
include or omit record type specification (P or U in 
column 8) if you specify an alternate collating sequence. 
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Column 27 (Print Option) 

Sort can issue: 

• Sequence specification lines 

• Diagnostic messages (S, T, and W type messages), for 
any errors in sequence specifications 

• Program-status messages (I type messages) to identify 
various states of the job 

• Action messages (A type messages, followed by 
formatted message displays), to identify circumstances 
requiring attention before you can continue the job 

Note: The programmer messages are contained in 
Appendix E, Sort Programmer Messages. The operator 
messages are contained in the IBM System/32 Displayed 
Messages Guide, GC2 1-7704. 

Column 27 Indicates which of the preceding information 
you want the sort program to issue during a job: 



Column 27 
Entry 


Program Issues 


0 or Blank 


Sequence specifications 
Diagnostic messages 
Program-status messages 
Action messages 
Formatted messages 


1 


Program-status messages 
Action messages 
Formatted messages 


2 


Action messages only 
Formatted messages 


3 


Formatted messages 



Column 28 (Output Option for Tagalong Sorts) 

Column 28 applies to tagalong sort (SORTR, SORTRS) 
jobs only. It indicates whether or not you want the 
program to drop control fields from output records after 
the records are sorted. A blank in column 28 means keep 
the control fields; X means drop them. 



Considerations for Dropping Control Fields 

Control fields are normally dropped when you use opposite 
control fields or an alternate collating sequence. In these 
two cases, the program changes the control information 
(during the sorting process) so that it is meaningless. 

Using Fields Both as Control and Data Fields 

If you are using opposite control fields or an alternate 
collating sequence and you want to keep the control 
information in a meaningful form in the output records, 
describe the fields twice: once as control fields and once as 
data fields. Data fields are not involved in the sorting 
process and are not changed by the program. 

Columns 29-32 (Output Record Length (in bytes) for 
Tagalong Sorts) 

Columns 29 through 32 apply to tagalong sort (SORTR, 
SORTRS) jobs only. The entry in these columns tells the 
program the length of records in the final sorted file. 

jf you do not drop control fields, the length includes both 
control and data fields. If you drop control fields, the 
length includes only data fields. Record length must be 
1 through 4096 bytes. 

Calculating Output Record Length When Dropping 
Control Fields 

For each type of record, total the lengths of all the data 
fields you are including in the job. Select the largest total. 
Enter this number in columns 29 through 32. 

Calculating Output Record Length When Not Dropping 
Control Fields 

For each type of record, total the lengths of the data fields. 
Select the largest total, add this total to the number in 
columns 13 through 17, and put the sum in columns 
29 through 32. 
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Column 34 (Nonverify Option) 

Column 34 applies to all sort runs. If an N is placed in this 
column of the sort header statement, none of the data 
written on the work file will be verified. A blank or a 
character other than N will cause the data written on the 
work file to be verified. 

Note: If you use the nonverify option (to minimize run 
time) when your output file is to overlay the input file, the 
input file might be destroyed if a terminal error occurs 
before end of job. Therefore, if the input file cannot be 
easily recreated, you should have a duplicate copy for 
backup. The input file can be destroyed under identical 
circumstances whether the nonverify option is used or not. 
However, the chance for input file destruction is greater 
when using the nonverify option; therefore, use this option 
with care. 



Column 36 (Null Output-Bypass Halt for MSG 
SORT-7724) 

Column 36 applies to all sort runs. A blank can cause sort 
to issue message SORT-7724 NO INPUT RECORDS 
INCLUDED. The operator can either select option 0, 
which creates an empty output file, or option 3, which 
cancels the job without creating an output file. An N in 
column 36 causes sort to create an empty output file with- 
out issuing message SORT-7724. 

Columns 40-72 (Job Description) 

Columns 40 through 72 are for your comments. You can 
use any characters you want in these columns. If the 
program prints specification lines (the column 27 entry is a 
zero or blank), the comments you include in these columns 
are printed. Comments have no effect on the program. 
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Chapter 3. Record Type Specifications 



Record type specifications tell sort which of the records 
in a file are to be sorted. Remember, if all of the records 
in a file are to be sorted, and they all have the same format, 
record type specifications are not required. 

Possible column entries, summarized on this page and in 
Appendix C for quick reference, are explained in detail in 
this chapter. 



RECORD TYPE SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


01x-06x 


Line number. You can leave column 5 (x) blank, or enter any value to 
keep the specifications in ascending order. 


6 


I 


Include line. 


O 


Omit line. 


7 


Blank 


This is the first line of a set of I or O record type lines. 


A 


AND lines. These specifications continue the definition of the record 
described on the preceding line. 


O 


OR line. These specifications define a different type of record than the 
one on the previous line. 


* 


v»Ji i if iici 1 1 line. 


S 


C 


Use both zone and digit portions of characters. 


z 


Use only zone portion of a 1 -character field. 


D 


Use only digit portions of characters. 


P 


Signed packed decimal data. 


U 


Signed unpacked decimal data. 


9-12 


1-4096 


The input record position in which the factor 1 field begins (blank if 
field is only one position long). 


13-16 


1-4096 


The input record position in which the factor 1 field ends. 


1718 


EQ 


Factor 1 must equal factor 2. 


NE 


Factor 1 must not equal factor 2. 


LT 


Factor 1 must be less than factor 2. 


GT 


Factor 1 must be greater than factor 2. 


LE 


Factor 1 must be less than or equal to factor 2. 


GE 


Factor 1 must be greater than or equal to factor 2. 


19 


F 


Factor 2 is another field in the same input record. 


C 


Factor 2 is a constant. 


K 


Factor 2 is a keyword. 


20-23 


1-4096 


The input record position in which the factor 2 field begins (blank if 
field is only one position long). 


24-27 


1-4096 


The input record position in which the factor 2 field ends. 


20 39 


Any characters 


The factor 2 constant. 


40-72 


Any characters 


Comments. 




Columns that must be filled in. 
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COLUMN DESCRIPTIONS 



Column 6 (Line Type) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number 
(columns 3 through 5) form a 5-digit sequence number. As 
the sort program reads sequence specifications, it checks 
the sequence numbers to make sure they are not in 
descending order. If the numbers are in descending order 
(if page 02 specifications come before page 01 specifica- 
tions, for example) and specifications are being issued, the 
sort program places a warning (the letter S) next to the line. 
(The S stands for sequence error.) After issuing a warning, 
the program continues reading the rest of the specification 
lines, then issues a message and waits for further 
instructions from the operator. The operator can either 
continue or end the job. 

Because page number applies to all lines on a page, columns 
1 and 2 appear only once, in the upper right corner of 
the page. You number the pages in ascending order. 

Record type line numbers are 01 through 06. The numbers 
in columns 3 and 4 are preprinted on the coding sheet. 
You can leave column 5 blank or enter any value to keep 
your specifications in ascending order. If you have more 
than six record type lines, use another coding sheet and 
start at line 01. 



Out-of-Sequence Lines 

Use column 5 when you want to insert a specif ication with- 
out renumbering the other specifications. For example, to 
insert a specification line between lines 01010 and 01020, 
you can number it 01015, code it, and then continue to fill 
out the rest of the sheet. 

Be sure any lines that are out of sequence on your coding 
sheet are clearly marked. You can do this by writing a note 
in the margin of the page with an arrow pointing to where 
the insert belongs. (Sample Job 3 in Chapter 7, Sample 
Sort Jobs.) 



Column 6 identifies the line type. An I in this column 
stands for either an include or an include-all line; an O 
stands for an omit line. 

If the type of sort job you are running requires you to code 
record type lines, you must use include or include-all lines 
to describe the records you want sorted. Records not 
described in include lines are not sorted. 



Include Line 

Include lines identify records you want the program to sort 
by describing particular record fields. 

Include-All Line 

Include-all is a special form of include line; it has no record 
description (columns 7 through 39 are blank). An 
include-all line tells the program to sort all of the records 
that have not been described by any preceding include or 
omit line for the job. Records referred to by an incjude-all 
line must have the same field specifications. 

Note: Only one include-all line can be used per job. If 
used, it must be the last record type line for that job. 

Omit Line 

Omit lines identify records you do not want the program to 
sort. Omit lines are not required, but can be helpful when 
you have many types of records you want the program to 
use and just a few you want omitted. Omit lines are 
normally followed by an include-all line, telling the 
program to sort all of the records that are not described by 
omit lines. 
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Sets 



There are two types of sets: include sets and omit sets. An 
include set identifies one or more record types you want to 
include in your sort job. An omit set identifies one or more 
record types you want to omit from your sort job. (The 
records in any record type always have at least one 
characteristic in common— such as an X in position 5.) 



Here are four rules to remember when you are using include 
and omit sets: 

1. All include sets must end with a field line. 

2. Omit sets never have field lines. 

3. Every omit set must be followed by an include set. 

4. The last set must be an include set. 

There are five types of include sets and three types of omit 
sets. 



Include Sets 1 


Type 


Column 6 


Column 7 


Explanation 


Include AND 
lines 


H, F, or 0 

1 
1 

F 


A 


Header line, field line, or omit line. 

New record type indicated by a blank in column 7. ^ 
Lines that describe the same record type (as the > 
previous line) have an A in column 7. ) 
Field line(s). 


Record 

Type 

Lines 


Include OR 
lines 


H, F, or 0 

1 
1 

F 


0 


Header line, field line, or omit line. 

New record type indicated by a blank in column 7. ^ 
Lines that describe a different record type (than the > 
previous line) have an 0 in column 7. ) 
Field line(s). 


Record 

Type 

Lines 


Include AND 
and OR lines 


H, F, or 0 

1 
1 

1 

F 


0 
A 


Header line, field line, or omit line. 

New record type indicated by a blank in column 7. \ 
This line designates a record type which is different 1 
than, but has the same field lines as, the record type I 
described in the previous line(s). / 
This line continues the same record type of a I 
previous line or lines. This record type can be con- / 
tinued (IA), or a different record type can be started l 
(10), provided all record types have the same field \ 
lines. Record types with different field lines would 1 
have to start a new include set. / 
Field line(s) for either A or 0 record types. 


Record 

Type 

Lines 


Include only 
one record 
type (implied 
include-all) 


H 
F 




Header line. 

No record type lines. 

Field line(s). 


Include-all 


H, F, or 0 
1 

F 




Header line, field line, or omit line. 
Tells the sort program to sort all of the records that \ 
have not been described by any preceding include f 
and omit lines. Records referred to in this manner ( 
must have identical field specifications. ) 
Fjeld line(s). 


Record 

Type 

Line 


1 Every include set must end with field lines. An include set can be followed by another include set, an omit set, or // END. 




Note: Records not described in include sets will 


not be sorted. 
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Omit Sets 1 


Type 


Column 6 


Column 7 


Explanation 


Omit AND lines 
(one record type) 


H or F 

0 

0 


A 


Header line or field line (last line of include set). \ 
New record type indicated by a blank in column 7. f Record 
Lines that describe the same record type (as the f Type 
previous line) have an A in column 7. 1 Lines 


Omit OR lines 
(different record 
types) 


H or F 

0 

0 


0 


Header line or field line (last line of include set). \ 
New record type indicated by a blank in column 7.) f Record 
Lines that describe a different record type (than t Type 
the previous line) have an 0 in column 7. j Lines 


Omit AND and 
OR lines (differ- 
ent record types) 


HorF 

0 

0 

0 


A 
0 


Header line or field line (last line of include set). 

New record type indicated by a blank in column 7. ] 

Lines that describe the same record type (as the f Record 

previous line) have an A in column 7. / Type 

Lines that describe a different record type (than % Lines 

the previous line) have an 0 in column 7. / 


1 There are no field lines in omit sets. Each omit set must be followed by an include or an include-all set. 



Guide to Using Include and Omit Sets 



Column 7 (Continuation or Comments) 



When to Use Include Sets: If you want to sort only a few 
records in a file, use an include set for each type of record 
you want to sort. 

When to Use Omit Sets: If you want to sort all but a few 
records in a file, use omit sets followed by either an include 
set for each type of record you want to sort or an include-all 
set. 

Mixing Include and Omit Sets: You can mix include and 
omit sets. But because sort processes the sets in the order 
they are coded, you must be particularly careful when you 
do this. For example, if you wanted to omit all records with 
a 2 in position 10 but sort those with a 2 in positions 10 and 
15, you would have to specify the include set before the 
omit set. If you specified the omit set first, all the records 
you wanted to sort would be omitted from the job. 



Column 7 indicates the line's relationship to the preceding 
line. 



Column 
7 Entry 


Explanation 


Blank 


This line is the first of a set of include or 
omit lines. (The type of set is indicated 
by the column 6 entry; I for include or 
0 for omit.) 


A 


This line is a continuation of the preced- 
ing line. The A stands for AND. 


0 


This line applies to a different record type 
than the preceding line, but the control 
field specifications for both are the same. 
The 0 stands for OR. 


* 


This line is a comment line. Comment 
lines do not affect program operation 
in any way. Their only purpose is to help 
you remember what you were doing in a 
certain section of coding. Comments are 
printed only if column 27 of the header 
line contains a zero or a blank. 
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Column 8 (C/Z/D/P/U) 



Your column 8 entry tells sort how to interpret data in the 
factor 1 and factor 2 fields during compare operations. 
When the fields contain alphameric data, a C, Z, or D entry 
tells sort what portions of the characters to use. When the 
fields contain signed numeric data, a P or U entry tells 
sort whether the data is packed or unpacked. 





Column 
8 Entry 


Compare Operations 


Maximum 
Field Length 1 




C 


Use both zone and digit 
portions of the characters 


256 characters 


Alphameric 
Data 


z 


Use only the zone portion 
of the character 


1 character 




D 


Use only the digit portions 
of the characters 


16 characters 


Signed 

Numeric 

Data 


P 2 
U 2 


The numeric data is packed 
The numeric data is unpacked 


8 bytes or 1 5 digits 
and a sign 
16 digits 


1 For both factor 1 and factor 2 fields, which must be the same length. 
Do not use a packed or unpacked factor in an include or omit record type specification 
(P or U in column 8) if you specify an alternate collating sequence (S in column 26 of the 
header line). 



Significance of the Column 8 Entry 

You use record type specifications to tell sort which records 
you want to sort. You do this by instructing sort to test 
each record by comparing the data in a specific field with 
the data in another field in the same record, with a 
constant, or with all or part of the program date. The data 
you are comparing is the factor 1 field; the data you are 
comparing it with (the contents of another field in the 
same record, a constant, or all or part of the program date) 
is the factor 2 field. The result of the comparison deter- 
mines whether or not that record will be sorted. Because 
sort sees your data as nothing more than a series of elec- 
tronic bits, you must tell the program how to interpret 
the data: 

• Lf the data is alphameric, what part of the characters 
should be compared. 

• If the data is signed numeric, is it in packed or unpacked 
format. 



Interpreting Data 

EBCDIC characters are represented by a byte composed of 
8 bits. 

Each character has two parts: a zone portion and a digit 
portion. Some characters have identical zone portions; 
some have identical digit portions. No two characters have 
identical zone and digit portions. 



Character 



1 

2 
3 
K 
? 

P 

blank 
0 



How It Looks inside the Computer 



Zone Portion 



0101 
1111 
1111 
1111 
1101 
0110 
1101 
0100 

1111 



Digit Portion 



1100 
0001 
0010 
0011 
0010 

1111 

01*11 
0000 
0000 



Notice that the digit portions of a zero and a blank are 
exactly the same. 



Suppose, for example, that you want to sort only records 
with a 2 in column 1 5 and a 2 in column 50. To get those 
records included in your sort, you would have to put a C in 
column 8. The C tells the sort program to use both the zone 
and digit portions of characters in its compare operations, 
and no other character has the same zone and digit portions 
as a 2. 

If you put a D in column 8, you would also get the records 
with a 2 in column 15 and a 2 in column 50. However, you 
would also get a lot of records you did not want, because 
several characters have the same digit portion as a 2. 



Alphameric Data 

When the factor 1 and factor 2 fields contain alphameric 
data, the column 8 entry must specify one of the following: 

1 . The zone and digit portions of the characters (C 
entry). 

2. Only the zone portion of the character (Z entry). 

3. Only the digit portions of the characters (D entry). 



If you instruct sort to use only the digit portions of 
characters (by putting a D in column 8), characters with 
identical digit portions will look alike and compare as 
equal. Likewise, if you instruct sort to use only the zone 
portion of characters (by putting a Z in column 8), char- 
acters with identical zone portions will look alike and 
compare as equal. So your column 8 entry is critical in 
ensuring that your compare operations produce the results 
you intend. 
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Numeric Data 



When the factor 1 and factor 2 fields contain numeric data, 
the column 8 entry must answer two questions: 

1. Are the numbers signed or unsigned? 

2. Are the numbers packed or unpacked? 



Format of 
Numeric Data 


Column 
8 Entry 


Definition 


Consideration 1 


Unsigned 


D 


Number does not have a sign. 


Absolute values of the numbers are used. 
If a number has a sign, it is ignored. For 
example, -3 would be considered equal 
to +3. 


Signed 


Packed 


P 


Number always carries a 
sign. When the number is 
placed in main storage it 
has a digit portion only. 


The sign controls the comparison. For 
example, -3 is less than 0 and +5 is more 
than -6. 




Unpacked 


U 


Number always carries a 
sign. When the number 
is placed in main storage, 
it has both a zone and a 
digit portion 


The sign controls the comparison. For 
example, -3 is less than 0 and +5 is more 
than -6. 


1 Before comparing numeric data, sort automatically converts any leading blanks to zeros. 



Signed Numbers: Signed numbers can be either positive 
or negative. The sign of a number is indicated by a 4-bit 
binary code. 



Sign 


Binary Code 


+ 


1 1 1 1 1 


+ 


1010 


+ 


1100 


+ 


1110 




1101 




1011 



1 Standard form. Sort accepts 
all four forms of the plus sign. 
Before sorting the file, however, 
the program converts all plus 
signs to the standard form. If a 
main storage dump is printed, 
the plus sign will always be ex- 
pressed as a hexadecimal F. 



Packed and Unpacked Numbers: An unpacked digit is 
represented by 8 bits; a packed digit is represented by 4 
bits. 



Unpacked Digits 




Pad 


ced Digits 


Digit 


Binary Form 


Digit 


Binary Form 














0 


0000 


0 




0000 




1 


0001 


1 




0001 




2 


0010 


2 




0010 




3 


0011 


3 




0011 




4 


0100 


4 




0100 




5 


0101 


5 




0101 




6 


01 10 


6 




0110 




7 


0111 


7 




0111 




8 


1000 


8 




1000 




9 


1001 


9 




1001 







— ~/ ^r-^-^s Digit Portion Only 

Zone Digit 
Portion Portion 
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In unpacked numbers, the 4-bit sign code replaces the zone 
portion of the last digit in the number. In packed numbers 
the sign code takes up the last four bits of the number. 



UNPACKED 



PACKED 



Positive 



Negative 



Positive 



Negative 



+2049 




11,1,1,1 ,0,0,1 ,0)1 ,1 ,1 ,1 ,0,0,0,011 ,1 ,1 ,1 jofiggi .1 .1 .1 g jjffil 

ZONE DIGIT ZONE DIGIT ZONE DlQf£ ZONE 1$|GIT 



Positive Zone 




-2049 



2^ 0^ 4| _ 

1 1 ,1 ,1 ,1 1 0,0,1 ,o|i , 1 ,1 ,1 ,0,0,0,011 ,i ,1 ,1 ,o,i ribi ,1 ,o,i ,p ,o7i 



ZONE DIGIT ZONE DIGIT ZONE DIGE|I> ZONE fl»GIT 





+204 9 




9 4^^^^^ 



|0 0 0 0|0 0 1 0|0 0 0 0|0 1 0 0|1 0 (jjjl 1 1 1 1 ^ 
DIGIT DIGIT DIGIT DIGIT Diofc SIGN (+) $ 



204 9. 





^_2_ ^0^ 4 9^p^l^|^ 
|0000|001 0|0 00 6|0 1 00|1 O&ljl 1 0 1 j ^ 



DIGIT DIGIT DIGIT DIGIT DIGff SIGN (-) 



24 



Columns 9-16 (Factor 1 Field Location) 



Coding Rules 



Factor 1 fields identify your records. (If all of your inven- 
tory records contain an I in column 2, for example, column 
2 is a factor 1 field.) The sort program identifies records 
you want sorted by comparing factor 1 fields with other 
fields in the same record, with constants, or with all or part 
of the program date. Columns 9 through 16 identify the 
locations of the factor 1 fields in the records. If there is 
more than one factor 1 field for the records you are describ- 
ing, you must: 

• Describe each field in a separate record type line. 

• Put an A in column 7 of every line (except the first) to 
tell sort that all of the lines apply to the same record 
type. 

Columns 9 through 12 (From) identify where the factor 1 
field begins in the record. Columns 13 through 16 (To) 
identify where the field ends. 



Length of Factor 1 Fields. 

A factor 1 field can contain anywhere from 1 to 256 
characters. No factor 1 field, however, can be longer than 
the length of the records you are working with. (For 
example, when you are working with 96-character records, 
the longest possible factor 1 field you can have is a 96- 
character field.) The length of factor 1 fields is also 
controlled by the column 8 entry. 



Entries must be right-justified: the From entry must 
end in column 12; the To entry must end in column 
16. 

To describe factor 1 fields that are only one character 
long, leave columns 9 through 12 (From) blank and 
enter the number of the record position that contains 
the character in columns 13 through 16 (To). 

For example, here is the entry you would make to 
describe the position of a factor 1 field which consists 
of a B in column 2. 

Record Type 



From 

ilO 11 12 13 14 15 16 



Factor 2 {Field, Constant, or Keyword) 



From 

20 2l|§||gij 24 25 26 21 



28 29 30 31 32 33 34 35 36 37 



Column 8 


Maximum Factor 1 Field Length 


C 


256 characters 1 


Z 


1 character 


D 


1 6 characters 


P 


8 characters 2 


U 


1 6 characters 



When factor 2 is a constant, the length of the factor 1 field 
must not exceed 20 characters. When factor 2 is a keyword, 
the length of the factor 1 field must be 6 if the keyword is 
UDATE, and must be 2 if the keyword is UMONTH, 
UDAY, or UYEAR. (See Columns 20-39 for more 
information.) 

'' Because the factor 1 field is packed, the field can actually 
represent 15 decimal digits and a sign. 
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Columns 17-18 (Relation) 



Columns 20-27 (Factor 2 Field Location) 



The program identifies records you want to sort by com- 
paring the factor 1 field (columns 9 through 16) with 
another field (columns 20 through 27) in the same record, 
with a constant (columns 20 through 39), or with all or 
part of the program date (columns 20 through 39). The 
other field in the same record, the constant, or the program 
date is called factor 2. Columns 17 and 18 tell the program 
what the results of the comparison must be. (If alternate 
collating sequence is used, both factor 1 and factor 2 are 
modified before the comparison is made.) 



Column 

17-18 

Entry 


Meaning 


EQ 1 


Factor 1 must equal factor 2. 


NE 1 


Factor 1 must not equal factor 2. 


LT 


Factor 1 must be less than factor 2. 


GT 


Factor 1 must be greater, than factor 2. 


LE 


Factor 1 must be less than or equal to 
factor 2. 


GE 


Factor 1 must be greater than or equal to 
factor 2. 


1 If you want the program to compare zone portions of charac- 
ters (Z in column 8), EQ and NE are the only entries you can 
use. 



The factor 2 field must be the same length as the factor 1 
field. It also must be in the same record as the factor 1 
field. 

Columns 20 through 27 are used to record the location of 
the factor 2 field. Columns 20 through 23 (From) identify 
the starting position of the field; columns 24 through 27 
(To) identify where the field ends. 

Coding Rules 

Entries must be right-justified: the From entry must end 
in column 23; the To entry must end in column 27. 

To describe fields that are only one character long, leave 
columns 20 through 23 (From) blank, and enter the 
number of the record position that contains the character 
in columns 24 through 27 (To). 



Column 19 (Field, Constant, or Keyword) 

The sort program identifies records you want to sort by 
comparing the factor 1 field (columns 9 through 16) with 
another field in the same record, with a constant, or with 
all or part of the program date. The other field in the 
same record, the constant, or the program date is called 
factor 2. Column 19 tells the sort program whether 
factor 2 is another field, a constant, or a keyword that 
represents all or part of the program date. F in column 19 
means factor 2 is a field; C means factor 2 is a constant; K 
means factor 2 is a keyword. 

When you put an F in column 19, you use columns 20 
through 27 to identify the location of the factor 2 field 
in the records. When you put a C in column 19, you use 
columns 20 through 39 for the constant. When you put a 
K in column 19, the keyword must begin in column 20. 
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Columns 20-39 (Factor 2 Constant) 

) When factor 2 is a constant, you use columns 20 through 
39 to write in the constant you want to use. The constant 
can be any arrangement of characters and blanks. 

The constant must be the same length as the factor 1 field. 
For example, if you have a 4-position factor 1 field, your 
constant field must take up four positions. If your con- 
stant is the number 6, you would put the 6 in column 23, 
and either leave columns 20, 21 , and 22 blank or fill them 
with zeros. 



Record Type 









Factor 2 (Field, Constant, o 


Keyword) 
























— Keyword - 


-*■ 


























o 

19 


20 


Loc. 

From 
21 22 23 


ation 

To 

24 25 26 


1 
1 

27|28 29 


30 


31 


32 


33 


34 


35 36 


37 


38 39 


40 


41 







































































































































Record Type 



OR 



Factor 2 (Field, Constant, or Keyword) 




IS F/C/K 1 




40 41 


* Key wo 

Loc 

From 
20 21 22 23 


d — H 

"1 

ation | 
To 1 

24 25 26 27 1 28 29 30 31 32 33 34 35 36 37 38 39 






£ 




b 








1 












































1 












































— f- 





























If the factor 1 field contains a packed number, the length 
of the constant (including the sign) must be twice the 
length of the factor 1 field. 



Alphameric Constants (Column 8 Entry is C, Z, or D) 

The constant must be the same length as the factor 1 field 
and must always begin in column 20. 

Numeric Constants (Column 8 Entry is P, U, or D) 

Format: Numeric constants must be right-justified within 
the field length specified in factor 1 (within twice the field 
length if factor 1 is a packed number). For example, 
assume that factor 1 defines a 6-position field in the input 
record, and that factor 2 is the numeric constant 123. To 
right-justify the constant within six positions, you would 
have to put the constant in columns 23, 24, a$d 25. 
Leading zeros are not required. Blanks and zeros look the 
same to sort. In the preceding example, columns 20 
through 25 could contain either 000123 or 000123 (with 0 
representing a blank). 

Note: For character constants, a D in column 8 indicates 
that only the digit portion of a character will be used in the 
compare operations. For numeric constants, a D in column 
8 indicates that the numbers are unsigned. 
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Signed Constants: If factor 1 is a packed number, the last 
character in the constant must be its sign (+ or — ). If factor 
1 is an unpacked number and. the constant is a negative 
number, the last character in the constant must indicate 
both the numeric value of the last digit and the negative 
sign for the entire constant. 



Coding Negative Unpacked Constants 


If Last Digit 


Character That 


How the Number Looks Inside 


in Constant is 


You Code 


The Computer 








Zone Portion 1 


Digit Portion 2 


* 

0 


- (minus code) 


0110 


0000 


1 


J 


1101 


0001 


2 


K 


1101 


0010 


3 


L 


1101 


0011 


4 


M 


1101 


0100 


5 


, N 


1101 


0101 


6 


0 


1101 


0110 


7 


P 


1101 


0111 


8 


Q 


1101 


1000 


9 


R 


1101 


1001 


1_ rhe zone portion indicates the negative sign of the entire number. 


2 The digit portion indicates the numeric value of the last digit in the number. 



For example, here are the entries you would make to sort 
records which have a packed negative 1 (-1) in positions 

I and 2, an unpacked negative 24 (-24) in positions 

5 through 8, and an unpacked negative 10 (-10) in positions 

II through 16. 



Record Type 



Line 


| -j Continuation (A/O/* )| 


| » C/Z/D/P/U | 


Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 




Number 
3 4 5 


| o> Type (I/O) 


I <o Stacker Select 


Loca 
From 

10 11 12 


tion 

To 

13 14 15 16 


IS F/C/K 


* Keywo 

Loc 

From 
20 21 22 23 


—Constant »> 

d — H 

"1 

tion | 
To 1 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 


1 

Record 1 
Name | 

I 

40 41 42 43 44 45 46 47|48 49 50 51 52 


0 


1 




I 




P 








L 








2 


£ 


Q 


c 






1 


































P 


A 


C 


k 


£ 


D 














0 


2 




r 


A 


u 








S 








s 


e 




c 






2 


































u 


N 


P 


A 


C 


K 


E 






2 






.£> 


3 




I 


A 


u 






I 


I 






1 


b 


E 


Q 


c 










1 






























11 


M 


P 


A 


c 


K 


E 


p! 




1 


0 




0 


4 




















































































i 










0 


5 




















































































1 

1 










0 


6 




















































































i 

i.„. 
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Columns 20-39 (Factor 2 Keyword) 



When factor 2 is a keyword, the column 8 entry must be a 
C. The keyword must begin in column 20;*all unused 
columns through column 39 should be left blank. The key 
word tells the sort program whether all or just part of the 
program date should be compared with the factor 1 field 
(columns 9 through 16). 



Keyword 1 


Part of Program Date 


Factor 1 
Field Length 2 


UDATE 
UMONTH 
UDAY 
UYEAR 


Entire program date 
Month portion of program date 
Day portion of program date 
Year portion of program date 


6 characters 
2 characters 
2 characters 
2 characters 


1 If the UDATE keyword is used, the program date must be in the same format 
as the date contained in the input records. If UMONTH, UDAY or UYEAR 
is used, the program date must be in the same format as the system date. 

2 The factor 1 field length must be 6 for UDATE, and must be 2 for UMONTH, 
UDAY or UYEAR. 



Columns 40-72 (Comments) 

Columns 40 through 72 are for your comments. If you 
instruct the sort program to print sequence specifications 
(column 27 of the header line is either blank or contains a 
zero), the comments will be printed along with your 
sequence specifications. The comments have no effect on 
the program's operation. 

Many programmers like to use columns 40 through 47 to 
write the names of the records described in the record type 
specifications. This is why columns 40 through 47 are 
enclosed in dotted lines on the coding sheet. 



Record Type Specifications 
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Chapter 4. Field Specifications 



Field specifications tell the sort program how to arrange 
and format (build) records in the work file and the output 
file. Possible column entries, summarized on this page and 
in Appendix C for quick reference, are explained in detail 
in this chapter. 



FIELD SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Contents 


Explanation 


1-2 


00-99 


Page number. 


3-5 


07x-14x 


Line number. You can leave column 5 (x) blank, or enter any value to 
keep the specifications in ascending order. 


6 


F 


Field specification line. 


7 . 

^^^^^^^^^^^^^^^ 


N 


Normal control field. 


0 


Opposite control field. 


F 


Forced control field. 


D 


Data field. 


S 


Summary data field. 


* 


Comment line. 


■ 8 


C 


Use both* zone and digit portions of characters in the field. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters in the field. 


P 


Signed packed decimal data. 


U 


Signed unpacked decimal data. 


V 


Force a data character into the data field. 




1-4096 


Start position of a field in the record (can be blank if the field is one 
character long). 


1346 


1-4096 


End position of a field in the record. 




Any character 


Forced control fields; the character you want the program to change. 
Also used for summary overflow indicator fields; the character to be 
used for the overflow indicator. 




Any character 


Forced control fields; the character you want the program to substitute. 
Also used for summary overflow indicator fields; the character that the 
overflow field is initialized to. 


mm 


Blank 


Forced control field line is not a continuation of the preceding line. 


Any character other 
than blank 


Forced control field line is a continuation of the preceding line. 


20-22 


1-256 


Overflow field length entry for summary tagalong sort only. 


23-39 


Blank 


Reserved for system use. 


40-72 


Any characters 


Comments. 




Columns that must be filled in for all sort jobs. 
/ /////////j Columns that must be filled in when forced control fields are being used. 
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COLUMN DESCRIPTIONS 



Column 7 (Field Type or Comments) 



Columns 1-2 (Page Number) and 3-5 (Line Number) 

Page number (columns 1 and 2) and line number (columns 
3 through 5) form a 5-digit sequence number. As the sort 
program reads sequence specifications, it checks the 
sequence numbers to make sure they are not in descending 
order. If the numbers are in descending order (if page 02 
specifications come before page 01 specifications, for 
example) and specifications are being issued, the sort 
program places a warning (the letter S) next to the line. 
(The S stands for sequence error.) After issuing a warning, 
the sort program continues reading the rest of the specifi- 
cation lines, then issues a message and waits for further 
instructions from the operator. The operator can either 
continue or end the job. 

Because page number applies to all lines on a page, columns 
1 and 2 appear only once, in the upper right corner of the 
page. Number the pages in ascending order. 

Here is the recommended procedure for field description 
line numbers. Field line numbers are 07 through 14. The 
numbers in columns 3 and 4 are preprinted on the coding 
sheet. You can leave column 5 blank or enter any value to 
keep your specifications in ascending order. If you have 
more than eight field lines, use another coding sheet and 
start at line 07. 

Use column 5 when you want to insert a specification line 
without renumbering the other lines. For example, to insert 
a specification line between lines 01070 and 01080, you 
can number it 01075, code it, and then continue to fill out 
the rest of the sheet. 

Be sure any lines that are out of sequence are clearly 
marked. You can do this by writing a note in the margin 
of the page with an arrow pointing to where the insert 
belongs. (Sample Job 3 in Chapter 7, Sample Sort Jobs.) 



Your column 7 entry tells the sort program whether you 
are describing a control field, a data field, or a comment 
line. If you describe a control field, the column 7 entry 
indicates how the field is to be used. 

See Columns 7-8 to find the ways in which you can 
combine this entry with the column 8 entry. 



Column 
7 Entry 


Tells Program 


N 


This is a normal control field. Sort this 
field so that the data from the field is in 
the sequence specified in column 18 of 
the header line. 


O 


This is an opposite control field. Sort this 
field so that the data from the field rs in 
the sequence opposite that specified in 
column 1 8 of the header line. 


F 


This is a forced control f ield. Change the 
control field according to the entries in 
columns 9 through 19. 


D 


This is a data field. 1 


S 


This is a summary data field. 2 


* 


This is a comment line. 


1 Use this entry for tagalong (SORTR, SORTRS) sorts only. 
(If you use a D entry during an addrout sort, the line will be 
treated like a comment line.) 

Use this entry for summary tagalong (SORTRS) only. (If 
you use an S entry during an addrout sort, the line will be 
treated like a comment line. If you use an S entry during a 
tagalong sort, the field will be treated as a normal data field.) 



Column 6 (Line Type) 

Column 6 contains a preprinted F, identifying the line as a 
field line. For addrout sorts (SORTA), field lines describe 
control fields that the sort program uses to sort record 
addresses. For tagalong sorts (SORTR) and summary 
tagalong sorts (SORTRS), field lines describe the fields that 
the sort program uses to create the records in the sorted 
output file. The fields can be either control fields (used to 
sort the records) or actual data fields. In addition, for 
summary tagalong sorts, field lines describe the fields that 
the program summarizes (adds together). 



Note: The first control field defined on a form for a 
record type is the major control field; subsequent control 
fields for that record type are minor control fields. 
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Data Fields (D in Column 7) 

Data fields apply to tagalong (SORTR, SORTRS) sort jobs 
only. They are fields you want the sort program to include 
in the sorted records, but which you do not want the sort 
program to use in sorting the records. Within each include 
set (include and field lines), control field lines must be 
placed before data field lines. 

When your file has more than one type of record: 

• The number of data fields does not have to be the same 
for all record types. 

• The total lengths of all of the data fields do not have to 
be the same for all record types. Sort places blanks to 
the right of shorter data fields so that all total lengths 
are equal. 

Note: For a summary tagalong sort (SORTRS), you cannot 
determine which input record's data field will appear in the 
summary record. 

Comment Lines (* in Column 7) 

Comment lines help document the program. They do 
not affect program operation in any way. You can code 
comment lines anywhere in the sequence specifications; 
however, comments will be printed only if column 27 of 
the header line contains a zero or a blank. 



Normal and Opposite Control Fields (N or 0 in Column 7): 
These control fields are fields in your input records that the 
sort program uses to select records for sorting. However, 
you can define 1 -character control fields that are not in 
the records by using an unconditional force (see Forced 
Control Fields). 

Forced Control Fields (F in Column 7): There are three 
types of forced control fields: 

• Conditional 

• Force-all 

• Unconditional 

Forced control fields affect the work and output records 
only. (It is important to remember that the sort program 
never changes your input records.) 

See Column 17, Column 18, and Column 19 for information 
on how to fill out the field specifications when you are 
using forced control fields. 

A conditional force occurs only if a control field in the 
input record contains a particular entry. Suppose, for 
example, that you want to sort a file of records, each of 
which has a 1 -position control field. If the character in 
the control field is an X, you want to replace it with an 
A before you sort the records. To do this, you would 
use a conditional force. Your conditional force field 
would tell sort: 



Control Fields (N, O, or F in Column 7) 

When your file has more than one type of record: 

• The number of control fields does not have to be the 
same for all record types. 

• The total lengths of the control fields do not have to be 
the same for all record types. 

When records with duplicate control fields (records with 
all control fields equal) are sorted, their order as output 
is unpredictable. 



Build a work record from the input record. 



1 -Position Control Field 



Control Field Portion 









| Data Portion 


Data 


C 


Data 




C' 
I 


Data 



Input Record Work Record 

If the control field contains an X, change it to an A. 



Data 



Data 



A | 



Date 



Input Record 



Work Record 
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Force-all is a special type of conditional force. Force-all 
occurs only when a control field in an input record does 
not contain a particular entry. Suppose, for example, that 
you want to sort a file of records, each of which has a 
1 -position control field. If the character in the control field 
is not a C, F, or $, you want to put an X in the field before 
you sort the records. To do this, you would use a force-all 
line to force the X into the control field. 

A force-all line follows a series of conditional force lines. 
For example, you may want to tell sort: 



The work record will then look like this: 



$ 


Control 


Control 


Data 




Field A 


Field B 





Control Field Portion 



Data Portion 



See Column 19 for actual coding examples of forced 
control fields. 



• If the control field contains a C, replace it with a 1 . 

• If the control field contains an F, replace it with a 2. 

• If the control field contains a $, replace it with a 3. 

• If the control field does not contain a C, an F, or a $, 
put an X in the control field. (You are forcing out all 
other possible entries by using a force-all line.) 

An unconditional force does not depend on entries in the 
input records. If, for example, you want to put a dollar 
sign ($) in the first position of every output record, you 
would use an unconditional force. Your unconditional 
forced control field would tell sort to put a dollar sign in 
the first available control field position of the work record. 



I 




Control Field Data Portion 

Portion 



Summary Data Fields (S in Column 7) 

An S in column 7 of the field specifications defines a 
summary data field. You can define summary fields for all 
three types of sort jobs, but the fields will be summarized 
(added together) only in summary sorts. In tagalong sorts 
(SORTR), summary fields are treated as normal data fields. 
In addrout sorts (SORTA), summary fields are treated as 
comments. 

In a summary sort, summary data fields in the output 
records for all record types must be in the same position. 
These data fields are summarized for all record types, even 
if all record types are not defined as containing summary 
fields. 

The output fields do not have to be in the same position as 
they were in the input records. See messages SORT-7278 
and SORT-7280 in Appendix E, Sort Programmer Messages. 

The maximum number of fields that can be summarized is 
24 for each record type in a sort job. 



Any other control fields will go after the dollar sign. 
Assume the input records are in this format: 



Data 


Control 


Data 


Control 


Data 




Field A 




Field B 





34 



Column 8 (C/Z/D/P/U/V) 

Your column 8 entry indicates what portion of the input 
record characters you want the sort program to use in 
building and sorting the work records. The column 8 entry 
is critical in assuring that the sort produces the results you 
intend. See Columns 7-8 to learn how you can combine 
this column 8 entry with the column 7 entry. 



Column 
8 Entry 


Character Portion 
Used 


Maximum 
Field Length 


C 


Use both zone and digit 
portions of the characters 


256 characters 


Z 


Use only the zone portion 
of the character 


1 character 


D 


Use only the digit portions 
of the characters 


1 6 characters 


P 


The characters are a signed, 
packed decimal number 


8 characters or 
15 digits and 

9 sign 


U 


The characters are a signed, 
unpacked decimal number 


16 characters 


V 


Force a data character 
into the data field 


1 character 



Suppose, for example, you have a 1 -character control field 
in your input records which can be either an *, 1, 2, or 3. 
The zone and digit portion of each character is: 



Character 


Zone 


Digit 


* 


0101 


1100 


1 


1111 


0001 


2 


1111 


0010 


3 


1111 


0011 



If you want the records sorted into ascending order by 
using the digit portion of the control field characters (by 
putting a D in column 8), they will be in this order: 

1 
2 

3 

* 



If you want the records sorted into ascending order using 
both the zone and digit portions (by putting a C in column 
8), they will be in this order: 

* 
1 
2 
3 

Suppose you placed a Z in column 8 and wanted the records 
sorted into ascending order. You can then be sure that the 
records with an * control field will precede the records with 
a 1, 2, or 3 control field. Since 1, 2, and 3 have identical 
zone portions, records with any of these numbers as a 
control field will not be in any special order after the sort. 

If you want to force characters into your data field, place a 
V in column 8 and, in column 18 specify the character to be 
forced. That character will be placed in the first available 
data field position of the work record. 

As you can see, your column 8 entry can drastically affect 
your sorted file. 

Do not confuse this column 8 entry with the column 8 
entry on the record type specifications. Column 8 of the 
field specifications tells the sort program what portion of a 
character to use to sort the records. The column 8 entry on 
the record type specifications helps select which records 
you want to be sorted. 



Opposite Control Fields 

If you want to sort records so that some control fields are 
in ascending order and other control fields are in descending 
order, use opposite control fields. An opposite control field 
is sorted in ascending order (if you specify descending order 
on the header line), or in descending order (if you specify 
ascending order on the header line). 

If your file contains different record types, all of which 
have an opposite control field in the same record position, 
your column 8 entries for these control fields must be one 
of the following: 

• All Ds 

• All Cs 

• AlIZs 

• Any combination of Cs and Zs 



With any other combination of entries (for example, Ds and 
Cs), you will not be able to predict the results of the sort. 
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When you use opposite control fields, sort changes them in 
building the work record. Therefore, you usually drop this 
meaningless control field information (by coding an X in 
column 28 on the header line) for tagalong or summary 
sorts. If the opposite control fields are all Ds, you do not 
need to drop the control field. If you wish to retain the 
original control field data in the output record, repeat the 
information as a data field. 

Packed or Unpacked Control Fields (Normal or Opposite) 

If you specify packed or unpacked control fields, the sort 
program changes the control fields while building the work 
record. Therefore, you may drop the control field informa- 
tion by coding an X in column 28 oh the header line. If 
you wish to retain the original field data in the output 
record, repeat the information as a data field. 



Forced Control Fields 

Here are a few rules to remember when you are using forced 
control fields: 

• You can have only one character in your forced control 
field. 

• You can force only entire characters (zone and digit) 
into your control field. 

• You can indicate either a conditional or an unconditional 
force. 

• A force-all line must be preceded by a conditional force 
line. 



Using Control Fields to Sequence the Sorted Records 

The order in which you describe control fields in the field 
specification lines determines the sequence of the records 
(tagalong sort) or the record addresses (addrout sort) in the 
sorted file. 

Suppose each record in your file that is sorted in ascending 
order (A in column 18 of the header line) has a normal 
control field in positions 1 and 2 and an opposite control 
field in positions 5 through 7. Each record represents one 
customer's order for a separate item. The part number is in 
positions 1 and 2; the number of parts ordered is in posi- 
tions 5 through 7. Your unsorted file might look like this: 

Input Record Position 



1 I 2 1 3 | 4 1 5 | 6 | 7 



0 


1 


7 


1 


2 


6 


1 


3 


4 


5 


1 


2 


2 


1 


7 


1 


2 


1 


3 


1 


5 




9 


6 


4 


3 


4 




1 


8 


5 


1 


7 




2 


0 


6 


3 


4 


2 


5 


0 



Input Part Number 
Record Number Ordered 
Number 

You can use the first control field to sort the records in 
ascending order according to the part number. You can 
then use the second control field to sort the number of 
parts ordered in descending order within each group of 
parts. Your sorted file would look like this: 



• You define a forced control field by placing an F in Output Record Position 



column 7 of the field specifications. 




1 


2 




4 


5 


See Columns 9-16, Column 17, Column 18, and Column 


0 


1 


5 




9 


6 


19 for further information on how to complete the field 


1 


1 


7 


1 


2 


6 


specifications. 
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1 


7 


1 
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1 


7 




2 
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3 


4 


5 


1 


2 




5 


3 


4 


2 
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0 




6 


3 


4 




1 


8 



Output Part Number 
Record Number Ordered 
Number 
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Include these field specifications to do the preceding sort. 
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Job 
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{in bytes! 
of Control Field 
Lengths for Any 
Record Type 
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[ S Sequence (A/D/S) | 


Card Match 


1 o> Alternate Coll. Seq.(S)| 


[3 Print Option | 


| co Output Option (X) 1 


Output 
Record 
Length 
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[8 Checkpoint Option(C)] 
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a 
O 

> 
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34 


35 


I co Null Output (N) | 


CCP/ 


Disk Sort Only 


Job Description 


Number 

3 4 5 


| a Type i 


Card: MATCH, 
SORT, SELECT, 
MERGE 


Stacker Select 


jS Number (1/N) | 


37 38 


o 

39 


Record 
Length 


Disk-. SORTR, 
SORTA, SORTRS 
Tape: SORTT 
7 8 9 io 11 12 


S 
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Record Type 






Line 


| Continuation (A/0/*l| 
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Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 
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3 4 5 


| o> Type (I/O) 


I Stacker Select 


Loca 
From 
10 11 12 


tion 

To 
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Notice that the information occupies different positions in 
the input and output records. The record positions change 
when the control fields and data fields are moved from the 
input to the work and from the work to the output files. 
Since an opposite control field is specified, all of the 
control fields in the input record are dropped (columns 1 
and 2 and 5 through 7). To save the control fields, specify 
them as data (see example). 



Field Specifications 



Columns 7-8 



Here are all of the possible combinations for columns 7 
and 8. 



Column 7 


Column 8 


Maximum 
Field Length 


N or o 


u 


zbb 




z 


1 




D 


16 




P 


8 




U 


16 


F 


C 1 


1 




z 


1 




D 


1 


D 


C 


occ 
ZOO 






1 




D 


16 




P 


8 




11 
\j 


1 u 




V 


1 


S 


C 


256 




z 


1 




D 


16 




P 


8 




U 


16 




V 


1 


# 




Does not apply 






(comment line) 


1 For an unconditional force line and a force-all line, column 8 
must contain a C. For a conditional force line, the column 8 
entry refers to the comparison between the control field in 
the input record and the record character being replaced 
(contained in the column 17 entry) rather than to the 
substitute character (contained in the column 18 entry). 



See column 7 and column 8 for detailed discussions of each 
entry. 
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Columns 9-16 (Field Location) 

Columns 9 through 16 identify the input record positions 
that contain the record fields. Columns 9 through 12 
(From) identify the starting position of a field; columns 
13 through 16 (To) identify the position in which the field 
ends. 

The order in which you describe the control fields in the 
field specifications determines the order they will be in 
in the sorted output records. 

For example, suppose you have an input record that looks 
like this: 



Input Record 



Field Name 


ITEM 




PRICE 




BAL 






REORD 




(item 




(price 




(number 






(reorder 




number) 




per item) 




in stock) 






point) 


Record Position 
















i 'e 


7 12 


15 21 


23 


29 



However, you want your sorted output record to look like 
this: 

Output Record 



Field Name 


ITEM 


REORD 


BAL 






Record Position 


1 




5 


6 


12 


13 




19 



Assuming that you want to sort the records by item 
number, here is how you would fill out the field 
specifications. 



Field 



Line 
















Forced 












Number 




O/F/D/S/*) 


> 

3 












haracter ] 


3 Character j 




Overflow 


Reserved 
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:/d/p 


Location 
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rieia 
Lengtl 
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Field 
Name 








3 
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5 
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6 


t— 


o 

8 


From 

9 10 11 




13 


To 
14 15 


16 


17 


I 
18 


o 

19 


20 21 


22 


23 


24 


25 


26 


27 


28 


29 


30 


31 


32 


33 


34 


35 


36 


37 38 39 


40 


41 


42 


43 


44 


45|46 


47 
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8 




F 
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0 
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% 
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Field Specifications 



As another example, if you want the 1 -character field in 
position 20 of your input record to be in the first position 
of the sorted output record, you would describe the field 
in the first line of your field specifications. In this 
example, the primary control field for the output file is 
determined by position 20 of the record. 



Line 


3 

B 
z 


|» (C/Z/D/P/U/V) | 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 21 28 29 30 31 32 33 34 
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Field Length 

The length of the field depends on the column 8 entry. 



Column 8 Entry 


Maximum Field Length 


C 


256 characters 


Z 


1 character 


D 


1 6 characters 


P 


8 characters or 
15 digits and sign 


U 


16 characters 


V 


1 character 



Coding Rules 

1. Entries must be right-justified. The From entry must 
end in column 12; the To entry must end in column 
16. 

2. To describe fields that are only one character long, 
leave columns 9 through 12 (From) blank, and enter 
the number of the record position that contains the 
character in columns 13 through 16 (To). 



Column 17 (Conditionally Forced Character) 

See Column 7 for a general discussion of forced control 
fields. You make an entry in column 17 when you want 
to use a conditional force. (For example, you might want 
to put an * in a control field only if the present entry is an 
A.) When you use conditional force, the input record does 
not change, but the work and output records will contain 
an * instead of an A. (See Column 7 or Column 18 for 
more information about conditional force.) 

The column 17 entry tells the sort program which character 
in the control field (defined in columns 13 through 16) you 
want to replace. The program checks to see if the control 
field in the work record contains the character you specified 
in column 17. If it does, the character in column 18 replaces 
the control field character. 

If a control field can contain any one of several characters, 
and you want to specify a forced character replacement for 
each one, you must include a column 19 entry in all of the 
forced field lines (except the first). See Column 19 for 
instructions. 

Besides being used for conditional force lines, column 17 
can also be used as a summary overflow indicator field. The 
column 17 entry, in this case, is the character that is the 
overflow indicator. For more information on summary 
overflow indicator fields, see Columns 20-22. 

Column 18 (Substitute Character) 

See Column 7 for general discussion of forced control fields. 
You make an entry in column 18 only when you are using 
forced control fields to sort your records. The character in 
column 18 either replaces the control field character you 
specify in column 1 7 or adds a new character to the control 
field. 

Remember that the change to the control fields does not 
alter your input record. Also, if you want to use forced 
control characters you can force a 1 -character field (only 
an entire character can be forced). 

Besides being used for forced control field lines, column 18 
can also be used as a summary overflow indicator field. The 
column 18 entry, in this case, is the character to which the 
overflow field is initialized. For mqre information on 
summary overflow indicator fields, see Columns 20-22. 
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Defining a Conditionally Forced Character 

1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C, Z, or D in column 8. 

4. Leave columns 9 through 1 2 blank. 

5. Define the position of the control field in the input 
record in columns 13 through 16. 

6. Enter the character you want to replace in column 1 7. 

7. Enter the character you want to replace it with in 
column 18. (You can use any character in column 18.) 

Defining a Force-All Character 

1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C in column 8. 

4. Leave columns 9 through 1 7 blank. 

5. Put the character which replaces the control field in 
column 18. 

6. Put any character in column 19. (The chracter in 
column 19 tells the sort program that the line refers 
to the same control field in the work record as the 
preceding line.) 

If you do not place a force-all line after conditional force 
lines and the sort program does not find the specified 
characters in the control field of the input record, the sort 
program : 

• Replaces the control field character with hexadecimal FF 
(if you specified ascending sequence in the header line). 

• Replaces the control field character with hexadecimal 00 
(if you specified descending sequence in the header line). 



Defining an Unconditionally Forced Character 

1 . Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C in column 8. 

4. Leave columns 9 through 17 blank. 

5. Put the character you are forcing in column 18. 

Sample Job 4 in Chapter 7, Sample Sort Jobs illustrates the 
use of unconditionally forced characters to group record 
types. 

Specifying an Overflow Indicator Field 

1 . Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an S in column 7. 

3. Put a V in column 8. 

4. Leave columns 9 through 16 blank. 

5. Enter a character in column 1 7 if you do not wish to 
use an * as a replacement. If overflow occurs in any 
summary data field in the record, the initial value of 
the overflow field will be replaced by the character in 
column 17. 

6. Enter a character in column 1 8. If none of the 
summary data fields overflow, the overflow field 
will contain the character specified in column 18. 
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Column 19 (Specifying Replacements for More Than One 
Character) 

If a control field in the input record can contain any one of 
several characters and you want to specify forced character 
replacements for more than one character, use a separate 
line to define each character you want to replace and the 
forced character you want to replace it with. 



Coding Rules 

1. Fill in columns 1 through 6 as you would for any 
control field. 

2. Put an F in column 7. 

3. Put a C, Z, or D in column 8. 



Examples of Using Forced Control Fields 

You can use forced control fields to change (add to or 
replace) a character in a 1 -position control field. The 
following examples represent these types of forced control 
characters: 

• Unconditional force 

• Conditional force using only forced control fields 

• Conditional force using normal or opposite control fields 
and forced control fields 

• Force-all 



4. Leave columns 9 through 12 blank. 

5. Define the control field in columns 13 through 16. 

6. Enter the first character you want to replace in 
column 17. 

7. Enter the character you want to replace it with in 
column 18. 

8. Fill in columns 1 through 6 (of the next line) as you 
would for any control field. 

9. Put an F in column 7. 

10. Put a C, Z, or D in column 8. 

1 1 . Leave columns 9 through 1 2 blank. 

12. Define the control field in columns 13 through 16. 

13. Enter the next character you want to replace in 
column 17. 

14. Enter the character you want to replace it with in 
column 18. 

15. Enter any character (except blank) in column 19. 
Your entry tells the sort program that the line refers 
to the same control field in the work record as the . 
preceding line. 

Repeat steps 8 through 15 for any other characters to be 
replaced. 
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Unconditional Force 



This example illustrates how you can unconditionally 
place a control field into the work and output records. 

Input Record 

Position 1 (control field) 20 through 22 (data field) 



A— 7 / 572 / 



Field Specifications 



Work Record 



Output Record 



EC 



DC 



From 
9 10 11 12 



13 14 15 16 
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572 



Control Data 
Field Field 



572 



This unconditional force 
moves a + into the first 
available work record 
position. 

Move the data field (posi- 
tions 20 through 22 of the 
input record) to the next 
three positions of the 
work record. 



Control 
Field 



Data 
Field 



Field Specifications 



Conditional Force Using Only Forced Control Fields 



This example illustrates how control field characters change 
according to the conditions you specify. 



Input Records 



Field Specifications 



Work Records 



Sorted Output 
Records (ascending 
sequence assumed) 



Position 



4 (control field) 20 through 22 (data field) 

* s r 



618 



7 



7 Z 
7 L 



510 



7 



307 



7 



Line 

Number 
3 4 5 


|- Type j | 


o = 
5 £ 

Q. ^ 

ft 

7 


5 

3 Lo 

i 

i From 

! 9 10 11 1 


cation 

To 

2 13 14 15 1 


3 Record Character 1 y 


£ Conttnustion [ | 


0 7 


F 


P< 








- y 


A 




0 8 


F 


F( 








- a 


B: 




0 9 


F 


F< 










Cd 




1 0 


F 


X 








.as 


I - 





If position 4 of the input record contains 
an A, move a 1 into the work record. 

If position 4 contains a B, move a 3 into the 
work record. 

If position 4 contains a C, move a 2 into the 
work record. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



1 


618 


3 


510 


2 


307 


Control 


^^Data^ 


field 


field 






1 


618 


2 


307 


3 


510 



Control Data 
field field 
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This example also shows how you can use column 1 9 
to specify conditional replacements for more than one 
character. Because continuation lines are used, only one 
position in the work and output records is defined by the 
first three lines. If column 19 is left blank, each line would 
define a new position in the work and output records. 

If you are sorting records into ascending order (A in column 
18 of the header line), the sort program places hexadecimal 
FF into the work record before you force any characters. 
If you are sorting records into descending order (D in 
column 18 of the header line), the sort program places 
hexadecimal 00 into the work record before you force any 
characters. Therefore, if the sort program does not find an 
A, B, or C in position 4 of the input record, the hexadecimal 
00 or FF is left unchanged in the work record. 



Conditional Force Using Normal or Opposite Control Fields 
and Forced Control Fields 

This example is similar to the previous one since the control 
field in the input record causes changes in the work and 
output records. In this case, however, the sort program first 
moves the control field to the work record (because the first 
control field is a normal control field) and then changes it if 
necessary. Notice that any forced character replacements 
are made before the records are sorted. 
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Input Records 



Field Specifications 



Work Records 



Sorted Output Records 
(ascending sequence assumed) 



Position 1 (control field) 20 through 22 (data field) 

5 / / 510 / 



7 L 
7 L 



822 



618 



7 
7 



Line 

Number 
3 4 5 


i 

] 

6 


f > 

ii 

? § 

7 a 


Lo 

From 
9 10 11 1 


.ation 

To 

13 14 15 1 


^ Record Character j 


ed 

3 § 

1 CJ 
3 19 


0 


7 












1 






0 


8 


M 


FC 








1 




IX 


0 


9 




rC 








I 


V 




1 


0 


M 


)C 




zt 

I 


i 

TT 




\ - 





5 


510 


9 


822 


7 


618 



Move the control field (in position 1 
of the input record) to the work rec- 
ord and use it to sort the records into 
order (assume that ascending order is 
specified on the header line). 

If position 1 of the input record contains 
a 9, replace it with a 7 in the work record. 

If position 1 of the input record contains 
a 7, replace it with a 9 in the work record. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



Control Data 
field field 



5 


510 


7 


618 


9 


822 



Control Data 
field field 
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Force-All 



Suppose your control field can contain characters other 
than A, B, or C. If you do not want a hexadecimal FF or 
00 in the work and output records, use a force-all line. 



Position: 



1 (control field) 



Input Records 



20 through 22 (data field) 



7 L 
7 L 



177 



521 



7 
7 



Field Specifications 



Line 


9 = 

IL « 

7 




Forced 


Number 
3 4 5 


& 

e 


! 

i Lo. 

I From 
3 9 10 11 1 


anion 

To 

1 13 14 15 1 


5 Record Character I 


[to Continuation j 


0 


7 


F 


Fi 


• 










I 


A 


I 


0 


8 


F 


ft 


m 










I 


R: 


*K 


0 


9 


F 


:< 












I 


a 


1 


0 


F 


F( 


















1 


1 




PC 


w 




2.2 






22 







Work Records 



Output Records 

(descending sequence assumed) 



TL 



If position 1 of the input record contains 
an A, move a 1 into the work record. 

If position 1 contains a B, move a 3 into 
the work record. 

If position 1 contains a C, move a 2 into 
the work record. 

This is a force-all line. If position 1 of the 
input record does not contain an A, B, or 
C, place an * into the first available work 
record position. 

Move the data field (positions 20 through 
22 of the input record) to the work record. 



1 


177 


# 


521 



Control Data 
field field 



1 


177 


* 


521 



Field Specifications 47 



Columns 20-22 (Overflow Field Length) 

These columns are used only by a summary tagalong sort to 
eliminate the possibility of an overflow condition. 

You can eliminate the possibility of an overflow condition 
by increasing the length of the summary data field to allow 
for any anticipated overflow. This can be done by coding 
an overflow field length entry in columns 20 through 22 of 
the field specifications. The overflow field length entry 
should be long enough to contain the sum of the summary 
data field length and the anticipated overflow length. The 
entry must be right-justified to column 22, and cannot 
exceed the maximum field length. 

For example, if you want to summarize an unpacked field 
in positions 6 through 10 of your input record and you 
know that the output will exceed the 5-position summary 
field by 2 positions, specify a 7 in column 22. 



Field 



Line 


c 
i 

u. 

§ 
z 


u 
8 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 36 36 37 38 39 




Number 
3 4 6 


|o> Type | 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 16 16 


1 3. Record Character | 


| co Substitute Character | 


|u Continuation ] 


Field 1 
Name I 

40 41 42 43 44 45 1 
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Q 
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If packed fields are summarized, columns 20 through 22 
should specify the number of bytes of packed data. 

For example, if you want to summarize a packed field in 
positions 1 through 3 of your input record and you know 
that the output will exceed the 3-position packed summary 
field (5 numbers plus sign) by 1 position, specify a 4 in 
column 22 (7 numbers plus sign). 
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Example of Summary Overflow Indicator Field 

Sometimes the summary data field size is too small to 
hold the sum of the corresponding data fields. Suppose 
the sorted file for a mail order company looked like this: 



A552 



23 



Cat. No. 



A552 



A552 



75 



No. Sold Cat. No. 



C200 



No. Sold 



10 



Cat. No. 



No. Sold Cat. No. 



No. Sold 



To define a summary overflow field, put an S in column 7 
and a V in column 8. The overflow field will be initialized 
to the character specified in column 18. If overflow occurs 
in any summary data field in the record, the initial value of 
the overflow field will be replaced by the character in 
column 17. (If you did not put an entry in column 17, the 
initial value of the overflow field will be replaced by an *.) 
If none of the summary data fields overflow, the overflow 
field will contain the character specified in column 18. 

Here are the entries you would make to: 

• Initialize an overflow field to +. 

• Replace the + with an * whenever a summary data field 
overflows. 



C200 



16 



Cat. No. 



No. Sold 



If the company used a summary sort but specified only 
two positions for the summary data field, its sorted file 
would look like this: 



A552 



03 



C200 



26 



Cat. No. 



No. Sold 



Cat. No. 



No. Sold 



The number sold for the first catalog number should be 
103, but since you have only a 2-position summary field, 
the third digit overflowed and was lost. Since it is essential 
that the company knows when an overflow occurs, its 
programmer will define an overflow indicator field that 
will print a summary overflow indicator whenever an over- 
flow occurs. 
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Suppose the following field specifications were used for the 
previous example. 
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Note: You can have only one summary overflow field 
for each record type. 



The output records would then contain the catalog 
number, the number of items sold (a summary data field), 
and the overflow field. The overflow field is initially 
blank, but it will contain an * after an overflow. 
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The summary output records would then look like this: 



1 A55203* 1 




Cat. No. No. Sold Overflow Field 



| C20026tt 1 




Cat. No. No. Sold Overflow Field 



You can also use the V entry in column 8 with a D entry 
in column 7. The character you specify in column 18 is 
unconditionally forced into your work record. See 
Sample Job 6 in Chapter 7, Sample Sort Jobs for an 
example of using these entries. 

Columns 23-39 (Reserved) 

These columns are not used. Leave them blank. 



Columns 40-72 (Comments) 

Columns 40 through 72 are for your comments. If you 
instructed the sort program to print sequence specifications 
(column 27 of the header line is either blank or contains a 
zero), comments are printed along with your sequence 
specifications. The comments have no effect on program 
operation. 

Columns 40 through 45 are enclosed in dotted lines on the 
coding sheet, because many programmers like to use these 
columns to write the names of fields they described in the 
field lines. 
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Chapter 5. How to Run Sort 



To run any sort job, you must: 

• Know the types of files you will use (input file, work 
file, output file). 

• Supply operation control language (OCL) and sequence 
specifications to run your job. 

OCL statements to load and execute a sort job can be 
entered into the system in two ways: by executing your 
own sort procedure stored on disk, and by entering your 
own sort procedure through the keyboard. 

This chapter describes how you set up your files (or use 
existing files), and how you specify what you want done 
with the information that your files contain or will contain. 

Note: Sorting can also be invoked through the Data File 
Utility (see the IBM System/32 Utilities Program Product 
Reference Manual-Data File Utility, SC2 1 -7600.) 



FILE INFORMATION 
File Characteristics 
Input File 

The input file is an area on disk that contains records to be 
sorted. Any indexed, sequential, or direct file with fixed 
length records can be used as input to the sort program; for 
example, an RPG II file or a file from a previous sort job. 
If you use the direct access method to create a file for the 
sort program, you might want to test for and omit blank 
records because direct file areas are set to blanks before the 
file is created. 



Work File 

The work file is an area on disk that is set aside as a work 
area. The sort program uses this area as working storage 
during the sorting process. You can either specify the 
work file area on disk or you can let the sort program 
automatically allocate it. 

You should usually give a work file scratch status 
(RETAIN-S) because the work file is created during a sort 
and usually has no function after the sort job is completed. 

Output File 

The output file contains the sorted file. If the output file 
exists before the sort, it cannot have permanent status 
(RETAIN-P) because the sort program cannot write into a 
permanent file. However, if the output file is built during 
the sort, it can have either temporary (RETAIN-T), or per- 
manent (RETAIN-P) status. RETAIN-S should not be used 
since the file would be deleted at the end of the sort job. 

Automatic Work File Allocation 

If you omit the work file FILE statement from your sort 
OCL statements, the sort program automatically allocates a 
scratch area on the disk. This scratch area is the remaining 
free disk space. 
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File Programming Considerations 



You must consider several file characteristics when setting 
up your files or selecting the type of sort you will use. Some 
basic considerations are: 





Addrout Sort (SORTA) 


Taaalona Sorts (SORTR SORTRS) 


Work file size 


Work file need only be big 
enough to contain control 

i fciuo aim icidiivc i cluiu 

numbers. 


Work file must be big enough to 
contain the entire file to be sorted. 

(Occ /-\|J|JCI IUIA r\ IUI ! 1 1 1 Ul i 1 Id UU 1 1 

on how to calculate work file size.) 


Sort output 


Relative record numbers 
only. 


Control fields, data fields, and 
summary data fields. (See Types 
of Sort: Addrout, Tagalong, and 
Summary Tagalong in Chapter 1 .) 


Input file 
overlay 


Output file should not 
overlay the input file. 1 


Output file can overlay the input 
file; that is, the input file can also 
be the output file. 2 


Sort job 
running time 


Usually shorter than 
SORTR orSORTRS. 


Usually longer than SORTA. 


1 If your input file is overlaid, you must have a backup copy of your input file that you can 

access using your addrout sort output. 
2 The space for the output file can be the same as the space for the input file. However, you 

should not overlay a file you want to sort unless you first make a backup copy of your input 

file. When you use the input file as the output file, you must specify (for your output file) 

the location and size. 
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RUNNING SORT BY USING YOUR OWN 
SORT PROCEDURES 



File Information Needed When Using Your Own Procedures 

The following text contains general file information. For 
detailed FILE statement parameter descriptions, see the 
IBM System/32 System Control Programming Reference 
Manual, GC21 -7593. 

If you enter your own OCL statements, you must supply 
sort with the following information: 

About the Input File: 

Name of the file you will sort. The FILE statement NAME 
must be INPUT. Use the LABEL keyword to give the sort 
program the name of your file if it is not INPUT. For 
example: 

// FILE NAME- IN PUT, LAB EL-MASTER 
where MASTER is the name of your input file. 



About the Work File (Optional): 



Name of your work file. The FILE statement NAME 
must be WORK. Use the LABEL keyword to give the 
sort program the name of your file if it is not WORK. 
For example: 

// FILE NAME-WORK,LABEL-SORTWORK,|^°Q^ s j>number,RETAIN-S 

where SORTWORK is the name of your work tile. 

Number of blocks or records in the work file. In the 
work file FILE statement, the number after either 
BLOCKS or RECORDS indicates the total number of 
blocks or records in the work file. See Appendix A for 
information on how to calculate the number for either 
BLOCKS or RECORDS. 



• Status of the work file. RETAIN-S (scratch at end-of- 
sort job) indicates work file status. The work file is 
usually a scratch file since you normally do not need the 
information in the work file after a sort job is run. 
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About the Output File: 



• Name of the sorted file. The FILE statement NAME 
must be OUTPUT. Use the LABEL keyword to give the 
sort program the name of your file if it is not OUTPUT. 
For example: 

// FILE NAM E-OUTPUT, LAB E L-SO RTM AST, | r g^O R DS } number ' RETAIN -|p 
where SO RTM AST is the name of your output file. 



• Number of blocks or records in the output file. In the 
output file FILE statement, the number after either 
BLOCKS or RECORDS indicates that total number of 
blocks or records in the output file. See Appendix A for 
information on how to calculate the number for either 
BLOCKS or RECORDS. 

• Status of the output file. RETAIN-T (temporary) or 
RETAIN-P (permanent) indicates output file status. A 
file built during the sort job can have either of these 
parameters; however, an output file that exists before 
the sort job is run cannot have permanent status because 
you cannot write into an existing permanent file. 
RETAIN-S should not be used since the file would be 
deleted at the end of the sort job. 

Note: If the work or output file you want to use is an 
existing temporary file (RETAIN-T), you must supply 
the location where the file begins and its originally 
allocated size. 



Source Member Information Needed When Using 
Your Own Procedures 

A source member can contain the sort sequence specifica- 
tions for a sort job. 

The format of the SOURCE statement is: 

// SOURCE source member name 

For a detailed description of source members and for 
information on how source members can be created 
using the $MAINT system utility program, see the IBM 
System/32 System Control Programming Reference 
Manual, GC21-7593. 

Source members and procedures can also be created and 
updated by the Source Entry Utility (SEU). For informa- 
tion on how to use SEU, see the IBM System/32 Utilities 
Program Product Reference Manual— Source Entry Utility, 
SC21-7605. 
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Executing Sort Procedures Stored on Disk 



Entering Sort Procedures through a Keyboard 



If you use a sort procedure that is on disk, sort sequence 
specifications can either be contained in a source member 
or can be contained within the procedure. 

To execute the procedure, enter either: 

name 



or 



// INCLUDE name 



where name is the name of the sort procedure. 



If you enter the OCL for a sort job through a keyboard, the 
sort sequence specifications can be in a source member or 
you can key them in with the sort procedure OCL. 

When sort sequence specifications are contained in a source 
member, the following OCL statements are keyed: 

// LOAD #GSORT 

//FILENAME-INPUT 

// FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT,... 

//RUN 

// SOURCE source member name 



If the sort sequence specifications are contained in a source 
member, your procedure includes: 

// LOAD #GSORT 

// FILE NAME- IN PUT 

//FILE NAME-WORK, . . . (optional) 
// FILE NAME-OUTPUT, ... 
// RUN 

// SOURCE source member name 

where the referenced source member includes: 

(header specification) 
(record type specifications) 
(field specifications) 
//END ^ 

The sort sequence specifications can be included in your 
sort procedure which then includes: 

// LOAD #GSORT 

// FILE NAME-INPUT 

// FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT 

//RUN 

(header specification) 
(record type specifications) 
(field specifications) 
//END 

Note: The procedure must contain an END statement after 
the last sort sequence specification statement. 



where the referenced source member includes: 

(header specification) 
(record type specifications) 
(field specifications) 
//END 

The sort sequence specifications can be keyed in with the 
sort procedure OCL statements as follows: 

// LOAD #GSORT 

// FILE NAME- IN PUT 

// FILE NAME-WORK, . . . (optional) 

//FILENAME-OUTPUT 

// RUN 

(header specification) 
(record type specifications) 
(field specifications) 
//END 

Note: The END statement indicates to the sort program 
that the last sort sequence specification statement has been 
entered. 

Two FILE statements are required for any offline multi- 
volume file. For multivolume file statements, refer to the 
IBM System /32 System Control Programming Reference 
Manual, GC21-7593. (The sort program does not support 
offline multivolume work files.) 

Note: Offline multivolume files cannot be processed while 
the sort program is running as an inquiry program. 
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Page of SC2 1-7633-2 
Issued 30 May 1980 
ByTNL: SN21-8090 

Chapter 6. Performance Considerations 



The time required to run a sort job can vary greatly, and 
depends on the following factors: 

• Number of records to be sorted 

• Record size 

• Number of sequence specifications 

• Whether or not alternate collating sequence is being used 

• Disk location of the input, work, and output files 

• Use of offline multivolume files 

• Whether or not automatic work file allocation is being 
used 

• Order of records in the input file 

• Use of the nonverify option 

The following text describes how each factor affects the 
time required to run a sort job. 

NUMBER OF RECORDS TO BE SORTED 

The more records you want to sort, the longer the sort job 
takes to run. For the most efficient sort job, therefore, use 
the record omit option whenever possible. 

RECORD SIZE 

The larger the records, the longer it takes to sort a file. 
Therefore, if program run time is important to you, do not 
include unnecessary fields in your sort job. Every field you 
do not include decreases the record size by the length of 
that field. Remember, sort builds a work record for each 
input record included in the sort. 



NUMBER OF SEQUENCE SPECIFICATIONS 

The more sequence specifications you use, the less main 
storage space will be available for records. 

• The code required by the select/build routine for any 
sort job uses about 100 bytes of storage. 

• Each sequence specification uses about 25 bytes of 
storage. (Remember that comment lines use no main 
storage.) 

• If you specify includes and/or omits (referring to packed 
data) for your sort job, the select/build routine will use 
an additional 200 bytes of storage. 

• If you specify field statements (referring to packed data) 
for your sort job, the select/build routine will use an 
additional 80 bytes of storage. 

• An alternate collating sequence uses an additional 375 
bytes of storage. 

Your sort job may run faster if you use additional 
sequence specifications to exclude records you do not 
want to sort. 

ALTERNATE COLLATING SEQUENCE 

Use of an alternate collating sequence increases the time it 
takes to run a sort job (see Alternate Collating Sequence in 
Appendix B). 
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DISK LOCATION OF FILES 



ORDER OF RECORDS IN THE INPUT FILE 



Because the sort program must move each record you want 
to sort at least two times (first from the input file to the 
work file, then from the work file to the output file), file 
location affects how long it takes to run a job. The distance 
the disk arm must travel between the input and work files 
and between the work and output files can be minimized to 
reduce running time. The following shows how the input, 
work, and output files for a sort job can be placed on a disk 
system. Each method shown will usually run slower than 
the method or methods that precede it: 



| | Input 


Work 


Output | 




Input 


Output 


Work 






Output 


Input 


Work 





Disk 
Disk 



(fastest 
method) 



The order of input file records can affect how long it takes 
to run a sort job. Suppose that two files have about the 
same number of records to be sorted. Suppose further that 
the two files contain identical information; however, more 
of the records in the first file are in the sequence you want 
than is true of the records in the second file. The sort 
program usually takes less time to sort the records in the 
first file than in the second file if the same sequence specifi- 
cations are used to sort both files. 



NONVERIFY OPTION 

If an N is entered in column 34 of the sort header specifica- 
tion, the sort program does not verify data written on the 
work file. The amount of performance improvement 
depends on file size, number of records, and file location. 



OFFLINE MULTI VOLUME FILES 



Use of offline multivolume files (diskette files) increases 
the time needed to run a sort job because diskette files are 
copied to disk before they are used. 



AUTOMATIC WORK FILE ALLOCATION 

Automatic work file allocation usually increases the time 
needed to run a sort job because an automatically allocated 
work file is not arranged for a fast sort run. If you want to 
minimize sort running time, use a well-planned work file 
and the work file FILE statement rather than automatic 
work file allocation. 
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Chapter 7. Sample Sort Jobs 



Each of the seven jobs in this section has: 

1. An introduction explaining its purpose. 

2. Filled-out sequence specification sheets. 

3. Discussion of the sequence specifications. 

The first six jobs use the following files and input records. 
(Sample Job 7 uses other files and input records, which 
are explained in the introduction to that job.) 

Files Records in Files Contents of Records 

Inventory Inventory • Quantities of 

File Records items in stock 



Number of trans- 
actions for each 
stock item 



Transaction 
File 



ssue Records 



Shipments of items 
to customers 



Receipt 
Records 



Purchases of more 
items from suppliers 
(vendors) 



Adjustment 
Records 



Corrections to inven- 
tory quantities 
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The formats of the four types of records are shown in the 
following charts. 



Record Formats for the Inventory File 



Record Field Contents 1 

Positions Names 





1-6 


ITEM 


Number of stock item to which the record applies. 






7-10 


CLASS 


Class of the item (men's clothing, jewelry, and so on). 


Item 

Information 




11-24 


DESC 


Description of the item. 






25-27 


LOC 


Location of the warehouse where the item is stored. 






28-29 


UNIT 


Unit of measure for ordering the item (by the pound, 
by the dozen, and so on). 






30-34 


COST 


Cost of the item per unit. 






oo-oy 


rnlUfc 


Price (per unit) at which the item is sold. 








n tUnU 


ncUIUcl pOIIIL \IOWeSL 5 LUCK. L|Udllllly allOWcUJ. 






to ou 


OTY 


Miirrthpr rtf iini+c to nrHoc \Aihon ror\ trior* inn 
tMUIllUcI U! UIIILb LU UlUcl Wllcll IcUlUcIlliy. 




Inventory 


51-56 

w / 

58-62 
63-68 


BAL 
ORDER 


Numhpr of unite in ctnpk 
Mnt i icoH 

IMUL UOCU. 

Numhpr nf imit<£ nrrlprpH hut not \/pt tpppix/pH 

Not used. 


Stnrk Statue 

and 

Ron trior 

Information 




RQ-74 


AVAI 1 

r\ V r\l L. 


Mnmhpr nf unite awailahip /RAI -1- DRnFRl 






75-80 


PORDER 


Purchase order number. 






81-86 


PDATE 


Date of purchase order. 






87 91 


VEND1 


First vendor. 






92-96 


VEND2 


Second vendor. 






97-99 


TRANS 


Number of transactions for this period. 






100-105 


TDATE 


Date of last transaction. 


Transaction 
Activity 




106-111 


ISSUES 


Number of units issued during this period. 





1 Any unsigned numeric field (packed or unpacked) can be treated as character information. 
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Record Formats for the Transaction File 




Record 


Field 


Contents 1 




Positions 


Names 






1 


ID 


1 (identifies this record as an Issue record). 




2-7 


ITEM 


Number of the stock item to which record applies. 




8-12 


QTY 


Number of units ordered (5 dozen, 32 pounds, and so on). 




1 "5 1 O 

lo-iy 


CUST 


Customer number. 


Issue 


20-27 


INV 


Invoice number. 


Record 


28-33 


DATE 


Date of the order. 




34 


DIS 


Discount information. 




35-39 


PRICE 


Price of the item per unit. 




40-42 


C0N1 


The constant 001. 




43-50 


COST 


Total cost of items ordered. 




1 


ID 


R (identifies this record as a Receipt record). 




2-5 


CLASS 


Class of the item ordered (men's clothing, jewelry, and so on). 


Receipt 


6-11 


ITEM 


Number of the item ordered 


Record 


12-16 


PRICE 


Price of the item per unit (by the dozen, by the pound, and so on). 




17-22 


PORDER 


Purchase order number. 




23-27 


QTY 


Number of units ordered. 




1 


ID 


A (identifies this record as an Adjustment record). 




2-7 


ITEM 


Number of the stock item to which record applies. 




8 


CODE 


Adjustment code (identifies reason for the adjustment). 


Adjustment 


9-13 


QTY 


Number of units (dozens, pounds, and so on) being added or 


Record 






subtracted. 




14-17 


OK 


Authorization for the adjustment. 




18-23 


DATE 


Date of the adjustment. 


1 Any unsigned numeric field (packed or unpacked) can be treated as character information. 



SAMPLE JOB 1 : PRODUCING A Fl LE OF INVENTORY 
INFORMATION FOR REORDERING STOCK ITEMS 

• The program selects inventory for stock items that 
need to be reordered. These are items for which the 
quantity on hand (AVAIL field) is less than or equal 
to the reorder point (REORD field). 

• Output records are to contain information needed to 
reorder the items. The information is in these fields: 
CLASS, ITEM, DESC, UNIT, COST, QTY, AVAIL, 
PDATE, VEND1, VEND2, and PORDER. 

• Output records are to be in ascending order by class 
(CLASS field) and by item numbers (ITEM field) within 
each class. 
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Because there is not enough space on the first coding sheet 
for the last three fields, they are coded on a second sheet. 
To show the proper sequence for the last three fields, put 
a 02 in columns 1 and 2 of the second coding sheet. 
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Header Specification 

Columns 1-2 

01 identifies this sheet as the first sequence specifications 
sheet. 



Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Columns 13-17 

The control fields used to sort records in this job are 
CLASS and ITEM. The total of their lengths is 10, which 
is the entry for columns 1 3 through 17. 



Column 18 

The A stands for ascending order. Output records are to be 
sorted into ascending order by CLASS and ITEM fields. 



Columns 29-32 

The output records contain eleven fields, including two 
control fields (CLASS and ITEM) and nine data fields. 
Control fields are not being dropped (column 28 is blank). 
Therefore, the length of the output record is the total 
length (64) of all eleven fields described in field 
specifications. 



Record Type Specifications 

Column 6 

I identifies the line as an include line. The input records 
described by the line are used by the program. All other 
input records are omitted. 



Column 8 

Both factor 1 and factor 2 fields are numeric positive fields. 
The D in column 8 causes zeros and blanks to be considered 
equal if leading zeros were not recorded. 

Columns 9- 16,17- 18, and 20-27 

Inventory records for which the number of units available 
(AVAIL) is less than or equal to the reorder point (REORD) 
are selected : 

• Columns 9 through 16 identify the location of the 
AVAIL field (record positions 69 through 74). 

• Columns 20 through 27 identify the location of the 
REORD field (record positions 40 through 45). 

• Columns 1 7 and 1 8 define the comparison made between 
the two fields. 



Column 19 

An F in column 19 indicates that factor 1 is compared to 
the field located by the entries in columns 20 through 27. 

Columns 40 through 72 



Columns 40 through 72 are comment columns. 

Column 36 

N in column 36 indicates that the sort program will create 
an empty output file if no records are found in the input 
file or if no records are selected for sorting, and will not 
issue message SORT-7724 NO INPUT RECORDS 
INCLUDED. 
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Field Specifications 

Column 6 

F identifies the lines as field specification lines. 
Column 7 

The first two fields described (CLASS and ITEM) are 
normal control fields. The rest are data fields. All are 
included in the output record (column 28 of the header line 
is blank). 

The records are sorted into ascending order by the CLASS 
field. Within each class, the item numbers (ITEM field) are 
in ascending order. 

CLASS Sequence ITEM Sequence 

Lowest Class No. Lowest item no. 

Next higher item no. 
Third higher item no. 



Sequence of Records 
in Sorted Output File 

Lowest class no. - Lowest item no. 
Lowest class no. - Next higher item no. 
Lowest class no. - Third higher item no. 



Highest item no. 



Lowest class no. - Highest item no. 



Each Higher 
Class No. 



Lowest item no. 
Next higher item no. 
Third higher item no. 



Class no. - Lowest item no. 
Class no. - Next higher item no. 
Class no. - Third higher item no. 



Highest item no. 



Class no. - Highest item no. 



Highest Class No. 



Lowest item no. 
Next higher item no. 
Third higher item no. 



Highest class no. - Lowest item no 
Highest class no. - Next higher item no. 
Highest class no. - Third higher item no. 



Highest item no. 



Highest class no. - Highest item no. 



Column 8 

Zone and digit portions of all characters in all fields are 
used as they appear in the input records. 



Columns 40-72 

Columns 40 through 72 are comment columns. 



Columns 9-16 

Columns 9 through 16 identify the locations of fields in the 
input records. 
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SAMPLE JOB 2: PRODUCING A RELATIVE RECORD 
ADDRESS FILE FOR AN ENTIRE INVENTORY FILE 



• Assume that the inventory file is an indexed file. The 
ITEM field is the record key used in the index. (The 
record keys are in ascending order.) 

• This job creates a record address file containing relative 
record numbers of all records in the file. It sorts them 
into ascending order by the CLASS field. Within each 
class, addresses are also sorted into ascending order by 
ITEM field. 

• As a result of this job, inventory records can be proc- 
essed consecutively in either of two ways: 

1. By using the file index, which is in ascending 
order by ITEM field. 

2. By using the record address file created by the sort 
program, which is in ascending order by CLASS 
and also by ITEM within each class. 



GX21 -9089-3 

International Business Machines Corporation Printed in U.S.A. 



SEQUENCE SPECIFICATIONS XJ^ Program r 

Header Page 1$3LLI Identification L 



Line 


Job 


Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 


[5 Sequence (A/D/SI | 


Card Match 


| oi Alternate Coll. Seq.(S)| 


|t3 Print Option j 


| co Output Option (X) | 


Output 
Record 
Length 

29 30 31 32 


| S3 Checkpoint Option(C) | 


jS Non- Verify Option (N)| 


| $ Reserved j 


| 8 Null Output (N) [ 


CCP/ 


Disk Sort Only 


Job Description 

44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


Number 
3 4 5 


|o> Type | 


Card: MATCH, 
SORT, SELECT, 
MERGE 


Stacker Select 


1 8 Number (1/N) | 


" Storage Size to 
Q Execute 


| g Length Code(R/C 


Record 
Length 


Disk: SORTR, 
SORTA, SORTRS 
Tape: SORTT 
7 8 9 10 11 12 


S 
U 

19 


S 
M 

20 


P 
M 


P 
U 

22 


S 
0 

23 


P 
0 

24 


40 41 42 43 


0 j 0 | 0 


H 


sbWrW 


I I Ilj0 


A 






















1 1 1 














I Ml Ml I I I 



Record Type 



Line 


O 




Factor 1 


Rel. 






Factor 2 (Field, Constant, o 


Keyw 


3rd) 


Comments 










< 


















EQ 












































































Number 


Type (I/O) 


Continuation 


C/Z/D/P/U 


Stacker Selec 


Loca 
From 


To 


NE 
LT 
GT 
LE 
GE 


F/C/K 


■« Keywo 

Loc 


d- 
atio 


-H 

To 


















Record 
Name 


1 


3 


4 


5 


6 


7 


8 


9 


10 


11 


12 


13 


14 


15 


16 


17 


18 


19 


20 


21 


22 


23 




25 


26 


27 1 28 


29 


30 


31 


32 


33 


34 


35 


36 


37 


38 39 


40 


41 


42 


43 


44 


45 46 


47|48 49 


50 


51 


52 


53 


54 


55 


56 


57 58 59 60 


61 


62 


63 


64 65 66 


67 68 69 


70 


71 


72 


0 


1 






































































































































0 


2 






































































































































0 


3 






































































































































0 


4 






































































































































0 


5 






































































































































0 


6 




















































































1 



















































Field 



Line 


3 

g 
7 


> 

Q 

N 
O 

8 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Comments 


Number 
345 


1- 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


| ^ , Record Character j 


| co Substitute Character | 


jio Continuation | 


Field I 
Name | 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


7 




F 


H 


c 








7 






I 


0 












1 II II 1. I.I I M 












z 


L 


A 


6 






a 


L 


(\ 


& 


5 




:> 


f 




r 


T 




h 








e 






L 


R 


* 










0 


8 




F 




p 








1 








b 


























■a 


a 


V.I 


c 


3 












z 


T 


6 


M 






s 


T 


D 


f* 


K 




L 












M 


M 


ft 




R 




















0 


9 




F 


































































































































1 


0 




F 


































































































































1 


1 




F 


































































































































1 


2 




F 


































































































































1 


3 




F 


































































































































1 


4 




F 



































































































































Sample Sort Jobs 65 



Header Specif ication 

Column 6 

H identifies the line as a header line. 
Columns 7- 12 

SORTA identifies the job as an addrout sort. 
Columns 13-17 

The control fields used to sort addresses in this job are 
CLASS and ITEM. The total of their lengths is 10, which 
is the entry for columns 1 3 through 1 7. 

Column 18 

The A stands for ascending order. The records are sorted 
into ascending order by item class (CLASS field), and by 
item number (ITEM field) within each class. 



Record Type Specifications 

Because all input records are being used and all have 

the same field specifications, no record type specifications 

are needed (include-all is implied). 

Field Specifications 

Column 6 

F identifies the lines as field specification lines. 
Column 7 

Both fields (CLASS and ITEM) are normal control fields. 
The record addresses are sorted into ascending order by 
CLASS field and by ITEM field within each class: 



CLASS Sequence 

Lowest Class No. 



ITEM Sequence 

Lowest item no. 
Next higher item no. 
Third higher item no. 



Sequence of Records 
in Sorted Output File 

Lowest class no. - Lowest item no. 
Lowest class no. - Next higher item no. 
Lowest class no. - Third higher item no. 



Highest item no. 



Lowest class no. - Highest item no. 



Each Higher 
Class No. 



Lowest item no. 
Next higher item no. 
Third higher item no. 



Class no. - Lowest item no. 
Class no. - Next higher item no. 
Class no. - Third higher item no. 



Highest item no. 



Class no. - Highest item no. 



Highest Class No. 



Lowest item no. 
Next higher item no. 
Third higher item no. 



Highest class no. - Lowest item no. 
Highest class no. - Next higher item no. 
Highest class no. - Third higher item no. 



Highest item no. 



Highest class no. - Highest item no. 
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Column 8 

C means that both zone and digit portions of the characters 
in the CLASS control field are used in the sorting process. 

D means that only the digit portions of the characters in 
the ITEM control field are used in the sorting process. This 
causes blanks to be treated as zeros. 



Columns 9-1 6 

The CLASS control field is located in positions 7 through 
10 of the input records. 

The ITEM control field is located in positions 1 through 6 
of the input records. 



SAMPLE JOB 3: PRODUCING A FILE OF INVENTORY 
INFORMATION ABOUT CERTAIN ITEMS 

• The program selects inventory records for stock items in 
classes 0126 through 0130. 

• Output records are to contain only inventory informa- 
tion that indicates the activity (transactions) involving 
the stock items. The information is in these fields: 
ITEM, CLASS, TRANS, and ISSUES. 

• Output records are to be sorted in ascending order by 
class (CLASS field), and in descending order by number 
of transactions (TRANS field) within each class. 
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Header Specification 

Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Columns 13-17 

The control fields used to sort records in this job are 
CLASS and TRANS. The total of their lengths is 7, which 
is the entry for columns 1 3 through 1 7. 

Column 18 

The A stands for ascending order. One control field 
(CLASS) is defined as a normal control field in field 
specifications. The other control field (TRANS) is an 
opposite control field. The records, therefore, are sorted 
into ascending order by item class (CLASS field), and into 
descending order by number of transactions (TRANS field) 
within each class. 



Column 28 

X indicates that control fields are being dropped from the 
output records because the TRANS field is an opposite 
control field. The program must convert the information 
from the TRANS field into a special form so that the records 
can be sorted properly. The program does not return the 
information to its original form after starting. The infor- 
mation, therefore, would be meaningless. 

The information from these two fields, however, is neces- 
sary in the output records. Therefore, the fields are also 
defined as data fields (see the explanation of column 7 of 
the field specif ications for this example). 



Columns 29-32 

Because control fields are dropped from the output records, 
the length of the output records is the total length of the 
fields defined as data fields in field specifications. The 
length is 19, which is the entry in columns 29 through 32. 



Record Type Specif ications 

Column 6 

I identifies the record type lines as include lines. The input 
records described by these lines are used by the program. 
All other input records are omitted. 

Column 7 

The A in column 7 of line 02 means that line 02 is a 
continuation of the definition of the record described in 
line 01 . The A means AND. An input record must meet 
all conditions listed in lines 01 and 02 before it is included. 



Column 8 

D in column 8 of lines 01 and 02 means that the digit 
portions of the characters in positions 7 through 10 of the 
records (factor 1) are compared with the digit portions of 
the constants 0126 and 0130 (factor 2). Leading blanks in 
positions 7 through 10 are treated like zeros. Therefore, 
b5126 (tf is a blank) and 0126 are considered equal. 



Columns 9-16, 17-18, and 20-39 

Inventory records that indicate the activity (transactions) 
of stock classes 0126 through 0130 are to be selected: 

• Columns 9 through 16 (factor 1) identify the location of 
the CLASS field (record positions 7 through 10). The 
CLASS field contains 4-digit class numbers. 

• Columns 20 through 23 list constants (C in column 19), 
that in this example define the upper and lower limits of 
the classes being selected from the inventory file. 

• Columns 17 through 18 define the relationship between 
the input record field being used to build the file (factor 
1 ) and the constants in factor 2. All inventory classes 
greater than or equal to (GE) 0126 and less than or 
equal to (LE) 0130 are to be included in the sorted file. 



Column 19 and Columns 20-39 

C in column 19 indicates that factor 1 is compared to a 
constant in columns 20 through 39. The constant in line 
01 is 0130. The constant in line 02 is 0126. 
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Field Specifications 

Column 6 

F in column 6 of lines 07 through 12 indicates that these 
lines are field specification lines. 



The form of the output record is as follows: 



ITEM 


CLASS 


TRANS 


ISSUES 


1- -6 


7- HO 


11- M3 


14- -19 



Positions 



Column 7 

Column 7 indicates the types of fields being described. The 
fields described in lines 07 and 08 (CLASS and TRANS, 
respectively) are control fields. CLASS is a normal control 
field. TRANS is an opposite control field. Output records 
are sorted so that CLASS fields are in the order indicated in 
column 18 of the header specifications (ascending order). 
Records having the same CLASS field are in descending 
order according to the TRANS field. 

The fields described in lines 09 through 12 are data fields. 
They are included in the output record but have no effect 
on the sequence of the records. 

Note that the CLASS and TRANS fields are described once 
as control fields and once as data fields because TRANS is 
an opposite control field. Its contents in the control field 
portion of the output records are changed in the sorting 
process and are meaningless for later processing. Therefore 
the control fields are dropped from the output records (X 
in column 28 of the header specifications) and CLASS and 
TRANS are defined as data fields so that they still appear 
in the output records. 



Column 8 

C in column 8, line 07, and in column 8, lines 9 through 12 
means that both the zone and digit portions of all characters 
in all fields are used as they appear in the input records. 
D in column 8, line 08, means that only the digit portions 
of the characters in the TRANS control field are used in the 
sorting process. 

Columns 9-1 6 

Columns 9 through 16 identify the locations of fields in the 
input records. 
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SAMPLE JOB 4: PRODUCING A HISTORY FILE OF 
TRANSACTION INFORMATION 



• The program selects records for all transactions in the 
transaction file. 



The entire file of input records is used to create output 
records. The output records are used to produce a 
history of the activity involving various stock. 

Output records are sorted by record type: RECEIPT 
records first, ISSUE records second, and ADJUST 
(adjustment) records last. Each type of record is sorted 
into ascending order by item number (ITEM field). The 
ISSUE records also have a subcontrol field— DATE OF 
ORDER. 



GX21 -9089-3 

International Business Machines Corporation Printed in U.S.A. 



SEQUENCE SPECIFICATIONS ±* Program 

Header Page IJBjjLI Identification 



Line ' 


Job 


Largest sum 
{in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 


5 Sequence (A/O/S) | 


Card Match 


| o> Alternate Coll. Seq.(S)| 


|S Print Option | 


[ 8 Output Option (X) | 


Output 
Record 
Length 

29 30 31 32 


| S3 Checkpoint Option(C) | 


iSNon-VerifyOption(N)| 


| Reserved | 


j SS Null Output (Nl ( 


CCP/ 


Disk Sort Only 


Job Description 

44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


Number 
3 4 5 


|e» Type | 


Card: MATCH, 
SORT, SELECT, 
MERGE 


Stacker Select 


% 
E 
Z 

25 


" Storage Size to 
os Execute 


i 

! 

39 


Record 
Length 


Disk: SORTR, 
SORTA, SORTRS 
Tape: SORTT 
7 8 9 10 11 12 


S 
U 

19 


S 
M 

20 


P 

M 

21 


P 

u 

22 


S 
0 

23 


P 
0 

24 


■ 

40 41 42 43 


0 | 0 | 0 


H 




I I Ll|3 


A 
































I 




II II II II M II II M II M II M II M M II 



Record Type 



Line 


| -j Continuation (A/0/")| 


3 

s 

N 
8 


Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 
3 4 5 


| o> Type (I/O) 


1 

S' 

■51 
2 1 

n | Loca 
' From 

9 |l0 11 12 


tion 

To 

13 14 15 16 


1 3 F/C/K 


* Key wo 

Loc 

From 
20 21 22 23 


Constant ■» 

d-*l 

"1 

ation t 
To 1 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 


_ _ _ -, 

Record ' 
Name | 

40 41 42 43 44 45 46 47|48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


1 








c 
















i 


E 




c 


R 














1 
1 
























R 


£ 


Z 


z 


I 


p 


T 




















































0 


2 














































1 
























































































.0 


3 














































— 1 — 
1 
























































































0 


4 














































1 

1 
























































































0 


S 














































1 
1 
























































































0 


6 














































1 
1 

























































































Line 


S 

g 
z 

7 


> 

3 

D 

8 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Comments 


Number 

3 4 5 


1 
1- 

6 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


3. Record Character | 


I co Substitute Character | 


co Continuation ] 


Field 1 
Name 1 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


7 




F 


F 


c 




















1 








I I I I I I I I I I I 
























F 


0 


R 


c 


E 


D 




C 
0 


P 


N 


r 


R 


O 


L 




F 


r 


E 


L 


D 














0 


8 




F 


« 


p 








(a 






J. 


i 








~\ 




1 


JL 








UI IC 


1 c 


Hi 


IC 
















I 


T 




H 






N 


u 


M 


8 


e: 


R 




R 




c 


r 


E 


M 




"> 


R 


D 


£ 


R 


£ 


D 










0 


9 




F 


D 


c 








2 








5 












































c 


L 




S 


s 


i 


C 


L 


A 


S 


5 




O 


F 






r 


F 








J 


£ 


W 


e 


L 


R 


Hi 




E 


T 


r. 


1 


0 




F 


D 


c 






1 


2 






1 


t> 








") 




T 


)t 


a 




2 




ia 


'£ 


c 


e 


s 












p 


R 


£ 


c 


£ 




P 


R 


r 


c 


E 




o 


F 




I 


r 


£ 






P 


E 


R 






N 


I 


r 










1 


1 




F 


D 


c 






L 


7 






2 


Z. 


























p 


O 


R 


0 






P 


U 


R 


c 


H 




ft 


£ 




O 


R 


0 


£ 


R 




N 


U 


M 


B 


E 


R 












1 


2 




F 


D 


£ 






2 


3 






?- 


7 














































G? 


T 


X 








w 


U 


M 


8 


E 


R 




O 


F 




u 


N 


I 


T 


5 




O 


R 


p 


E 


R 




D 








1 


3 




F 


































































































































1 


.4 




F 



































































































































70 



IBM 



I nternational Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



12 75 76 77 78 79 ! 

Program I I I | I T 
Identification I I I I I I 











o 


z 












































Output 


O 


o 







CCP/Disk Sort Only 

1"^ Record 
?E.| Length 



Record Type 



Line 


| i Continuation (A/0/*)| 


=) 

3 

u 

8 


Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 

3 4 5 


| o. Type (I/O) | 


<° Stacker Select 


tion 

To 

13 14 15 16 


|S F/C/K I 


Key wo 

Loc 

From 
20 21 22 23 


Constant 

d — H 

_ 1 

ation | 
To 1 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 


i 

Record f 
Name | 

I 

40 41 42 43 44 45 46 47)48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


1 




r 




c 
















1 


£ 


Q 


r 


T, 






































i 


s 


s 


u 


E 






i 

_iJ 


















































0 


2 




















































































i 


















































0 


3 




















































































i 
i 


















































0 


4 







































































































































Field 



Line 


3 

g 

H 

7 


|» (C/Z/D/P/U/V) | 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Comments 


Number 
3 4 5 


1— 

6 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


Record Character | 


\oo Substitute Character | 


|tS Continuation j 


Field I 
Name | 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


7 




F 


F 


c 




















Z 










! I M M M ! II 
























f 


P 


R 


z 


E 


D 




C 


P 


N 


r 


R 




L 






I 


E 


L 


D 














0 


8 




F 


H 


D 








I 








7 










\ 




Total— 13 characters 












E 


r 


E 








5 


r 


o 


t 


K 




r 


T 


e 


M 




N 


u 


M 


a 


£ 


R 




















0 


9 




F 


H 


D 






Z 


6 






3 


3 
















































D 


A 


T 


£ 






D 




T 


E 




O 


F 




o 


R 


D 


E 


p 




























1 


0 




F 


D 


C 








ft 






1 


a 
















































El 


T 


Y 








N 




M 


B 


£ 






D 


F 




U 


N 


1 


r 


5 




O 


R 


D 


E 


R 


E 


D 








1 


1 




F 


P 


c 






L 


3 






1 


9 
















































Z 


U 


5 


T 






C 


u 


5 


r 


o 




E 


R 




N 


u 


M 


6 


E 


R 
























1 


2 




F 


D 


c 






2 


zs 






2 


7 














Total— 26 characters 












X 


N 


V 








X 


N 


V 


D 


X 


C 


E 




Kl 


U 


M 


8 


E 


R 


























1 


3 




F 


P 


c 














3 


H 














































D 


£ 


S 








D 


r 


5 




p 


u 


N 


[T 




L 


Nl 


F 


O 


R 


V 


A 


T 


I 


p 


N 














1 


,4 




F 


P 


c 






3 


5 






3 


7 














































P 


R 


I 


z 






P 


R 


r 








O 


F 




C 


r 


e 


M 




p 


£ 






£ 


r 


& 


M 











IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



~j Program 
2?ii Identificatic 



GX21 -9089-3 
Printed in U.S.A. 
75 76 77 78 79 80 



CCP/Disk Sort Only 



I Record 
S £| Length 



Record Type 



Line 


| -< Continuation (A/0/*)| 


| » C/Z/D/P/U | 


Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 
3 4 5 


| o> Type (I/O) | 


I 1 

U | Loca 

1 From 
9 |10 11 12 


tion 

To 

13 14 15 16 


|S F/C/K I 


4 Keywo 

Loc 

From 

20 21 22 23 


Con stant * 

d— H 

tion | 
To I 

24 25 26 27 1 28 29 30 31 32 33 34 35 36 37 38 39 


Record 1 
Name | 

l 

40 41 42 43 44 45 46 47|48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


1 




I 




Z 
















1 


£ 




C 


A 






































A 


D 




U 


5 


r 






















































0 


2 






































































































































£> 


3 






































































































































0 


4 







































































































































Field 



Line 


3 

g 
z 

7 


> 

3 

u 

8 




Forced 


Overflow 

Field 

Length 

20 21 22 


Reserved 

23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 


Comments 


Number 

3 4 5 


6 


Loca 

From 
9 10 11 12 


tion 

To 

13 14 15 16 


|". Record Character | 


|co Substitute Character | 


u> Continuation j 


Field ,1 
Name | 

40 41 42 43 44 45|46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


7 




F 


F 


c 




















3 








1 ! M 1 1 1 ! ! 

T„j-„l "7 „l a. 
























F 


O 


R 




£ 


D 




~ 


0 


N 


T 


R 


a 


L 




F 




E 


L 


D 














0 


8 




F 




D 








a 








7 








-\ 




1 Ul 


dl 








Idl < 




1 ^ 
















r 


E 


M 






& 


T 


O 


C 


K 




£ 


T 


E 


M 




N 


u 




B 


E 


R 




















0 


9 




F 


D 


C 
















8 










H 






























z 


0 


O 


e 






A 


0 


J 


u 




T 




E 


N 


T 




C 




P 


E 
























1 


0 




F 


D 


C 








9 






.1 


3 














.a 


- 


1 


5 






:e 


rs 












q 


T 


Y 








N 


U 


h 


B 


£ 


R 




O 


F 




U 


N 


I 


T 


S 
























1 


1 




F 


D 


C 






1 


H 






1 


7 


















Id 


1 c 














0 


K 










A 


u 


r 


H 


O 


R 


r 


z 


A 


T 




O 






























1 


2 




F 


D 


c 






1 


8 






2. 


3 














































D 


A 


r 


£ 






D 


A 


T 


E 




O 


F 




A 


O 


J 


U 


s 


T 


M 


£ 


N 


T 


















1 


3 




F 


































































































































1 


,4 




F 



































































































































Sample Sort Jobs 71 



Header Specification 

Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 



Columns 13-17 

Three types of records are described: one on each sheet. 
The total length of the control fields for each type of 
record is 7, 13, and 7 characters, respectively. The largest 
of these totals (13) is the entry used in columns 13 
through 17. 



Column 18 

The A stands for ascending order. It indicates the order 
into which output records (described in the three sets of 
field lines) will be sorted. 



Columns 29-32 

The total length of control fields for each type of record 
described is 7, 13, and 7 respectively. The total length of 
data fields for each type of record is 20, 26, and 1 6 respec- 
tively. The largest control-field total (13) is added to the 
largest data-field total (26) and the result (39) is used in 
columns 29 through 32. 



Record Type Specifications 

Column 6 



Column 8, Columns 9-16, Columns 17-18, Column 19, and 
Columns 20-39 

Column 8 in line 01 of each of the three sheets contains a 
C indicating the the entire character in position 1 of the 
input records is to be compared with the constants R, I, 
and A respectively. Only input records with one of those 
characters in position 1 will be included in the job. 

In the record type lines, columns 9 through 39 have the 
following meanings: 

• Columns 9 through 16 identify the input-record position 
(position 1) being compared against R, I, and A. 

• Columns 17 through 18 indicate the comparison result 
that determines whether an input record is used (the 
character in position 1 must equal R, I, or A). 

• C in column 19 of each line indicates that the characters 
against which the input-record character is compared are 
constants supplied in columns 20 through 39. 

• Columns 20 through 39 supply the constants (R, I, and 
A, respectively) used in the comparison. 



Field Specifications 

Field specifications differ for the three types of records 
being described. The records, therefore, are described on 
separate coding sheets. 

Column 6 

F in column 6 of lines 07 through 12 on sheet 01, lines 07 
through 14 on sheet 02, and lines 07 through 12 on sheet 
03 indicate that the lines are field lines. 



Column 6 in line 01 of each of the three sheets contains 
an I indicating that the lines are include lines. The input 
records described by these lines are used by the program. 
All other input records are omitted. 
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Column 7 

Column 7 indicates the types of fields being described for 
each of the three types of records. The records described 
by sheets 01 and 03 (RECEIPT and ADJUST records respec- 
tively) have two control fields. The records described by 
sheet 02 (ISSUE records) have three. The remaining fields 
described are data fields. 

These diagrams show the formats of the output records that 
will be created from each of the three types of input records. 
The number underneath the field identification blocks indi- 
cate the positions information will occupy in the output 
record. 
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the first control field in each type of output record is 
a forced control field. The number 1 will begin every 
RECEIPT output record, 2 will begin ISSUE records, and 
3 will begin ADJUST records. This forces all RECEIPT 
output records to be first, all ISSUE records second, and 
all ADJUST records third. 

The output records for this job must be the same length. 
The total number of characters in the control fields 
described for RECEIPT and ADJUST was less than the 
total for ISSUE records (the control field length for ISSUE 
on the header is used to assign the absolute length of the 
control field). Therefore, the program added binary zeros 
at the end of the control fields for RECEIPT and ADJUST 
output records. Blanks were added at the end of the data 
portion of RECEIPT and ADJUST output records to make 
the total length of the records equal to the total length of 
ISSUE output records. 



Columns 9-16 and Column 18 

Columns 9 through 16 of the field lines identify the loca- 
tions of the fields in the input records. 

The first control field for each type of record is a forced 
control field. On each sheet, it is described by an uncon- 
ditional force line. For this reason, columns 9 through 16 
are blank in those lines. Column 18 identifies the character 
to be used in the forced control field: 1 in output records 
created from RECEIPT records, 2 in ISSUE output records, 
and 3 in ADJUST output records. 



Column 8 

C means that both zone and digit portions of the characters 
in the fields are used. D means that only the digit portions 
of the characters in the ITEM control field are used in the 
sorting process. 
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SAMPLE JOB 5: PRODUCING A LIST OF INVENTORY 
ITEMS REQUIRING ADJUSTMENTS 

• The program selects all adjustment records in the trans- 
action file. 

• The output record is a control field consisting of the 
stock item number only. 

• Since the output record consists of no data field and, in 
particular, no summary data fields, the result of the 
SORTRS job will be to eliminate all duplicate adjustment 
stock item numbers from the sorted file. 

• The output records, each consisting of a unique stock 
item number that had an adjustment, are to be in 
ascending order. 

• The output provides a list of all stock items that had an 
adjustment. 
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Header Specification 

Column 6 

H identifies the line as a header line. 
Columns 7-12 

SORTRS identifies the job as a summary sort. 
Columns 13-17 

Only one control field is used in this job: ITEM. Its length 
is 6, which is the entry for columns 13 through 17. 

Column 18 

The A stands for ascending order. 
Columns 29-32 

The output record consists of one control field only. The 
output record length is 6, the same as the control field 
length. 

Record Type Specifications 

Column 6 

I identifies the record type line 01 as an include line. Input 
records described by this line are to be sorted. Since this is 
the only include set, all other records are omitted. 



Column 8 

C in column 8 tells sort to use both the zone and digit 
portions of the factor 1 and factor 2 fields described in 
line 01. 



Columns 13-16, 17-18, 19, and 20 

Only adjustment records containing an A in position 1 are 
to be included in the sort. 



Field Specifications 

Column 6 

F in column 6 of line 07 indicates that this is a field 
specification line. 



Columns 7 and 8 

NC in columns 7 and 8 of line 07 indicates that the ITEM 
field described is a normal control field consisting of both 
the zone and digit portions of the characters in the ITEM 
field of the input records included in the sort. 



Columns 9 through 16 of line 07 identify the location of 
the ITEM field (having a length of 6) that is to be used as 
the control field. 



Columns 9-16 



Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 01 and 07. Therefore, column 7 
must be blank. 
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SAMPLE JOB 6: PRODUCING A SUMMARY HISTORY 
FILE OF ISSUES BY CUSTOMER NUMBER 



• The program selects all ISSUE records from the trans- 
action file. 

• Using a summary sort (SORTRS), a file is to be formed 
consisting of each customer to whom any stock item was 
issued. 

• Each output record consists of a unique customer 
number, the total number of issues made to that 
number, and the total dollar value of all the issues. 

• The output records are to be in ascending order by 
customer number. 



IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



5 pu 



Program 
Identifica 



GX21 -9089-3 
Primed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



Disk: SORTR, 
SORTA, SORTRS 



°l o i o l H Bbblr[risl 1 1 I 17k 



Largest sum 
(in bytes) 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Stacker Select ~ 



Output 
Record 
Length 



E5 



CCP/ Oisk Sort Only 

g| Record 
St Length 



41 42 43 144 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 
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| Continuation (A/0/*)| 
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* Key wo 
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Name | 
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Header Specification 



Columns 8, 16, 17-18, 19, and 20 



Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTRS identifies the job as a summary sort. 
Columns 13-17 

The work record as well as the output record consists of a 
control field made up of the customer number. Its length 
is 7, which is the entry for columns 13 through 17. 

Column 18 

The A indicates that the control field is to be sorted in 
ascending order. 

Columns 29-32 

The control field is not to be dropped when writing the 
output file. The length of the output record is the control 
field (seven characters as specified in line 07) added to the 
data fields (16 characters as specified in lines 08 through 
14). This totals 23 characters, and is the entry for columns 
29 through 32. 

Record Type Specifications 

Column 6 

I identifies the record type line 01 as an include line. Input 
records described by this line are to be sorted. Since this is 
the only include set, all other input records are omitted. 

Column 7 

Line 01 is the first (and only) include line of this include 
set consisting of lines 07 through 14; therefore, column 7 
must be blank. 



Only ISSUE records containing the full character I in 
position 1 of the input records are to be included in the 
sort. 



Field Specifications 

Column 6 

F in column 6 of lines 07 through 14 indicates that the lines 
are field lines. 

Columns 7 and 8 

NC in line 07 specifies that this is the control field to be 
sorted in the sequence specified in column 18 of the header 
line (ascending order) using both the zone and digit portions 
of the characters. 

Lines 08, 09, 1 1 , and 1 2 specify unconditional 1 -character 
force fields. 

Line 10 indicates that this is a summary data field. When 
the data in the input record (positions 40 through 42) is 
used to build a work record, only the digit portions of the 
characters will be used because CON1 is an unsigned decimal 
number. Using a D in column 8 with a signed number causes 
the absolute value of that signed number to be used. 

Line 13 also is specified as a summary data field. However, 
U in column 8 indicates that this is signed unpacked decimal 
data. The sign is to be moved to the work record and used 
in subsequent summary additions. 

Line 14 is specified as the summary overflow indicator byte. 



Columns 9-1 6 

Entries are placed in the From and To columns for lines 
07, 10, and 13 to indicate the control field (CUST), digit 
summary data field (CON1), and the signed unpacked 
decimal summary field (COST), respectively. 

For lines 08, 09, 1 1 , and 1 2, the entries are blank since 
these are unconditional 1 -character force fields. 

For line 14 the entries are blank since this line is an over- 
flow indicator specification. 
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Column 17 



The X in line 14 defines the field as an overflow indicator 
field. 



Column 18 

This column is only used for lines 08, 09, 11, 12, and 14. 
The line numbers and the forced value in the data fields are: 



08 


ft 


(blank) 


09 


# 




11 


\h 


(blank) 


12 


$ 




14 


\t> 


(blank) 



The initial work record created from the ISSUE records will 
look like this : 



Control Field Data Field 



| CUST 


0 


# 


CON 1 


0 


$ 


COST 


0 


Positions 


8 


9 


■ 


13 


14 




23 


1 7 


10 12 


15 22 



Since this is a summary sort, the CON1 and COST fields will 
be summarized for records having identical control fields 
(CUST). These portions 10 through 12 (CON1) in the work 
records will be summarized to reflect the total number of 
issues (TNUMB) for a given customer number. Likewise, 
positions 15 through 22 (COST) will be summarized to 
reflect the total cost of all issues (TCOST). 



The output record will look like this: 



| CUST 


0 # 


TNUMB 


0 $ 


TCOST 


tfor 

X 


Positions 






23 


1 7 


8 9 jl0 12 


13 nils 22 



A blank in position 23 indicates that TNUMB and TCOST 
are valid sums. X in position 23 indicates that overflow 
occurred when the sort program was summarizing TNUMB 
and/or TCOST for this customer number, resulting in an 
invalid sum or sums. 
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SAMPLE JOB 7: SORTING SUMMARY HISTORY 
FILE BY DESCENDING TOTAL DOLLARS ISSUED 
(NEGATIVE VALUES POSSIBLE) 



• The input for this job is the output file created by 
Sample Job 6. Each input record has the following 
format: 



Record 
Position 

1-7 

8-9 

10-12 

13-14 
15-22 

23 



Field 
Name 

CUST 



TNUMB 



TCOST 



Contents 

Customer number 

Constants: % # 

Total number of issues to 
customer 

Constants: tf$ 

Total cost of all issues to 
customer 



OFLOW Overflow indicator: 

16 - TNUMB and TCOST are 
valid sums 

X — Invalid sum or sums; 
overflow occurred while 
summarizing TNUMB 
and/or TCOST 



• Only records with valid TNUMB and TCOST will be used. 

• A record sort of the valid records is desired; that is, the 
format of the output record is to be identical to the 
format of the input record. 

• The records are to be sorted by total dollars issued 
(TCOST) in descending order. TCOST could be negative 
for some customer numbers. For this reason, a sort that 
considers the sign must occur. 
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• 



IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
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Header Specification 
Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 
Columns 13-17 

One type of record is specified to be included. The total 
length of the control fields for this type is 8 (the entry in 
column 17). 

Column 18 

D stands for descending order. The largest positive number 
comes first; the largest negative number (the negative 
number having the largest absolute value) comes last. 

For example, the absolute values of -19 and -99 are 19 and 
99. -99 is more negative than -19 since its absolute value 
is greater than 19. 

Column 28 

X indicates that the control field is to be dropped when 
forming the output file. 

Columns 29-32 

When the control field is dropped, only the data portion 
remains. This data portion is the entire input record. Thus 
23 is entered in columns 29 through 32. 



Record Type Specifications 

Columns 6 and 7 

Two record types are specified. One type is to be omitted 
(O in column 6). One is to be included. Each record type 
is specified by one record type line. Since these lines are 
the first (as well as the last) record type lines in their omit 
set and include set, column 7 must be blank. Note that the 
asterisk in column 7, line 03, indicates that this line is only 
a comment line. 



Columns 8, 9-16, 17-18, 19, and 20-39 

For line 01, these columns specify that if position 23 in the 
input record contains the character constant X, the record 
is to be omitted. 

Line 02 indicates that all records not omitted by line 01 
are to be included. For each record included, a work 
record is formed by the field specifications, lines 07 and 
08. Note that the control field is an 8-position unpacked 
field (line 07). 

For a more complete discussion of numeric data, see 
Columns 8 and Columns 9-16 under Column Descriptions 
in Chapter 3. 

Field Specifications 

Column 6 

F in column 6 of lines 07 and 08 indicates that these lines 
are field specification lines. 

Columns 7, 8, 9-16, and 18 

• Line 07 indicates unpacked data in the control field 
from positions 1 5 through 22 of the input record. (This 
control field is dropped because an X is coded in column 
28 of the header specifications.) 

• Line 08 indicates that the entire record is included as 
data. 
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Appendix A. Calculating the Sizes of Files for Sort 



INPUT FILE 

Use this formula to calculate the size (in blocks) of an input 
file. Round the result up to the nearest whole number: 



number of records 
in the file 



x input record length 



BLOCKS = 



number of bytes in a block (2,560) 



Note: Sort includes an 8-byte work block vector in every 
work block written to the work file. Therefore, the work 
file must be larger than a file that would hold the exact 
number of records to be sorted. This is why both formulas 
approximate the number of records or blocks to specify on 
the FILE statement for the work file. 



Work Record Length 



OUTPUT FILE 

Use this formula to calculate how many blocks the output 
file requires; round the result up to the nearest whole 
number: 



BLOCKS = 



number of records that 
will be selected for sorting 



output 
record length 



number of bytes in a block (2,560) 



If you use the RECORDS parameter in the output file 
statement: 



RECORDS = 



WORK FILE 



number of records that 
will be selected for sorting 



Use either of the following formulas to approximate how 
many blocks or records to specify on the FILE statement 
for the work file; whichever formula you use, round your 
results up to the nearest whole number: 



Type of 
Sort 


Type of Output 


Work Record Length 


SORTA 


Address output 


Length of control fields + 3 


SORTR 
or 

SORTRS 


Control fields 
only 


Length of control fields as 
specified in the header line 




Control fields 
and data 


Length of data + length of 
control fields. (This is the 
output record length spec- 
ified in the header line.) 




Data only 


Length of data + length of 
control fields. (Output 
record length specified in 
the header line plus the 
control field length spec- 
ified in the header line.) 



BLOCKS = 2 + 



number of records that work „ . 

x x 1 1 

will be selected for sorting record length 

number of bytes in a block (2,560) 



or 



2 number of bytes in 

_ _ number of records that _ [ a block (2,560) 

nbCORDo . , . ' 

will be selected for sorting . , ... 

1 work record length 
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Appendix B. 



Collating Sequence 



Standard EBCDIC Collating Sequence 



When Both Zone and Digit Portions of 
Characters are Used 


When Only the Zone Portion of 
Characters is Used 


When Only the Digit Portion of 
Characters is Used 


Order 
in the 
Sequence 


Character 


Correspond ing 
Hexadecimal 
Number 2 


Order 
Sequence 


Character 


Correspond i ng 
Hexadec i ms I 
Number 2 


Order 
in the \ 
Sequence 


Character 


Corresponding 
Hexadecimal 
Number 2 


1 

(lowest) 


blank \ 
\ 


40 






4A 
4B 




blank 
6 


40 
50 


2 




4A 


1 


< 


4C 


1 


- (minus) 


60 


3 




4B 


(lowest) 


( 


4D 


(lowest) 


) 


DO 


4 


< 


4C 




+ 


4E 


( 




5 




4D 




I 


4F 




0 


F0 


6 


+ 


4E 




! 


5A 




/ 


61 


7 


I 


4F 




$ 


5B 


2 


A 


C1 


8 


S 


50 


2 




5C 


J 


D1 


9 


! 


5A 


) 


5D 




1 


F1 


10 


$ 


5B 






5E 




B 


C2 


11 




5C 




n 


5F 


o 


K 


D2 


12 


) 


5D 




/ 


61 


o 


S 


E2 


13 




5E 






62 




2 


F2 


14 


"1 


5F 




% 


6C 




C 


C3 


15 


- (minus) 


60 


3 




6D 


4 


L 


D3 


16 


/ 


61 




(underscore) 




T 


E3 


17 




6B 




> 


6E 




3 


F3 


18 


% 


6C 






6F 




D 


C4 


19 


(underscore) 


6D 




# 


7A 
7B 


D 


M 
U 


D4 
E4 


20 


> 


6E 




@ 


7C 




4 


F4 


21 


? 


6F 


4 




7D 




E 


C5 


22 




7A 




(apostrophe) 




6 


N 


D5 


23 


# 


7B 




= 


7E 


V 


E5 


24 


@ 


7C 






7F 




5 


F5 


25 


(apostrophe) 


7D 




A 


50 
C1 


7 


F 
O 


C6 
D6 


26 


= 


7E 




B 


C2 


w 


E6 


27 




7F 




C 


C3 




6 


F6 


28 


A 


C1 


5 


D 


C4 




G 


C7 


29 


B 


C2 


E 


C5 




P 


D7 


30 


C 


C3 




F 


C6 


8 


X 


E7 


31 


D 


C4 




G 


C7 




7 


F7 


32 


E 


C5 




H 


C8 




H 


C8 


33 


F 


C6 




I 


C9 




Q 


D8 


34 


G 


C7 




- (minus) 
/ 


60 


9 


Y 


E8 


35 


H 


C8 




DO 




8 


F8 


36 


1 


C9 




( 






I 


C9 


37 


{ 
\ 


DO 




J 
K 


D1 
D2 


10 


R 
Z 


D9 
E9 


38 


J 


D1 


6 


L 


D3 




9 


F9 


39 


K 


D2 


M 


D4 




<t 


4A 


40 


L 


D3 




N 


D5 


11 


! 


5A 


41 


M 


D4 




O 


D6 






7A 


42 


N 


D5 




P 


D7 






4B 


43 


O 


D6 




Q 


D8 


12 


$ 


5B 


44 


P 


D7 




R 


D9 




6B 


45 


Q 


D8 




S 


E2 




# 


7B 


46 


R 


D9 




T 


E3 




< 


4C 


47 


S 


E2 




U 


E4 


13 




5C 


48 


T 


E3 


7 


V 


E5 


% 


6C 


AO 


u 


E4 


w 


E6 




@ 


7C 


50 


V 


E5 




X 


E7 




( 


4D 


51 


w 


E6 




Y 


E8 




) 


5D 


52 


X 


E7 




z 


E9 


14 




6D 


53 


Y 


E8 




blank 


40 


(underscore) 


54 


z 


E9 




0 


F0 




7D 


55 


0 


F0 




1 


F1 




(apostrophe) 




56 


1 


F1 




2 


F2 




+ 


4E 


57 


2 


F2 




3 


F3 


15 




5E 
6E 
7E 


58 


3 


F3 


8 

(highest) 


4 


F4 


> 


59 


4 


F4 


5 


F5 






60 




F5 










5 




6 


F6 




I 


4F 
5F 
6F 
7F 


61 


6 


F6 




7 


F7 


16 

(highest) 


~l 


62 


7 


F7 




8 


F8 


63 


8 


F8 




9 


F9 




64 
(highest) 


9 


F9 













When several characters share the same position in the sequence, they are considered equal. For example, if you are 
using only the digit portions of characters H, Q, Y and 8 (position #9) are considered equal. 

This is the number you use in ALTSEQ statements to identify a character that you want to shift to a different order 
in the sequence. 
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STANDARD COLLATING SEQUENCE 



Coding Rules 



The Standard EBCDIC Collating Sequence chart shows the 
three standard collating sequences: 

• Standard collating sequence when both zone and digit 
portions of characters are used. 

• Standard collating sequence when only the zone portion 
of characters is used. 

• Standard collating sequence when only the digit portion 
of characters is used. 



ALTERNATE COLLATING SEQUENCE 

If you want to change the standard collating sequence, you 
must code an S in column 26 of the header specification 
and code ALTSEQ statements. You can code as many 
ALTSEQ statements as you need. Each one must begin 
with ALTSEQ and can contain a maximum of 96 positions. 

Note: Do not use a packed or unpacked factor 1 in an 
include or omit record type specification (P or U in column 
8) if you specify an alternate collating sequence. 



3. 



4. 



5. 



Code ALTSEQ in the first six positions to tell sort 
you want to alter the standard collating sequence. 



QA|L|T[S|E|Qp 



Leave the next two positions blank. 

m lh i 



Enter the hexadecimal equivalent 1 of the character 
you are taking out of its normal sequence. 



Q 



Enter the hexadecimal equivalent 1 of the value that 
the character specified in columns 9 and 10 is to 
assume in the collating sequence. 



Q 



Enter as many pairs of 3 and 4 as the number of 
characters you are taking out of normal sequence. 



6. Leave no space between sets of hexadecimal numbers. 




7. When you reach the end of one statement, you can 
continue on the next specification line (follow rules 
1 through 6). 



8. Enter a double asterisk in positions 1 and 2 to indi- 
cate the end of the ALTSEQ statements. 



• i ■ i i i i * i i i i i 

maximum of 96 positions 



Q 



Q 



maximum 96 positions 



Q 



J 



maximum of 96 positions 

IIIIIIIIIIMT 



1 See Standard EBCDIC Collating Sequence chart for hexadecimal 
equivalents of all characters. 
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Input Order When ALTSEQ Statements Are Used 

ALTSEQ statements follow the header line. When you use 
an alternate collating sequence, your input must be in this 
order: 

1. OCL statements 

2. Sequence specifications 

a. Header line 

b. ALTSEQ statements 

c. ** 

d. Record type and field lines as required 

3. // END 



Programming Considerations 

When you move a character into the sequence position 
normally assigned to another character, both the new and 
the original character occupy the same position and are 
considered equal. (See the first sample ALTSEQ statement.) 
If you do not want the two characters to be equal, you 
must also move the character that normally occupies that 
position. (See the second ALTSEQ statement.) 

Effect of ALTSEQ Statements on Other Coding 
ALTSEQ statements can change: 

• Factor 1 and factor 2. 

• Normal and opposite control fields. 

• Control field characters before they are replaced or 
added to by forced fields. 



Sample ALTSEQ Statements 

To Change the Sequence of One Character 

ALTSEQ ALTSEQ 40F0 
Statements * * 

Explanation Blank (40) is moved to the position in the 
collating sequence occupied by zero (F0). 
Blanks and zeros, therefore, are considered 
equal. 

To Change the Sequence of Several Characters 

ALTSEQ ALTSEQ 5BC8C8C9C9D1 
Statements * * 

Explanation 5BC8 moves $ (5B) to the position occupied 
by H (C8). 

C8C9 moves H (C8) to the position 
occupied by I (C9). 
C9D1 moves ! (C9) to the position 
occupied by J (D1). 

The $, therefore, has been inserted between 
G and H, as follows: 

A, B, C, D, E, F, G, $, H, I, (I and J occupy 
the same position). 



PROGRAMMING AIDS 

You can use a Translation Table and Alternate Collating 
Sequence Coding Sheet to keep track of changes you make 
to your collating sequence. A sample sheet is included for 
your information. 



ALTSEQ statements never change data fields in records or 
forced control field characters. 
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IBM 



International Business Machines Corporation 

TRANSLATION TABLE AND ALTERNATE COLLATING SEQUENCE CODING SHEET 



Code 


Graphic 


Entry 


Replaced 
By/Takes 
Place Of 


00000000 




00 




00000001 




01 




00000010 




02 




00000011 




03 




00000100 




04 




00000101 




05 




00000110 




06 




00000111 




07 




00001000 




08 




00001001 




09 




00001010 




OA 




00001011 




06 




00001100 




oc 




00001101 




0D 




00001110 




0E 




00001111 




OF 




00010000 




10 




00010001 




11 




00010010 




12 




00010011 




13 




00010100 




14 




00010101 




15 




00010110 




16 




00010111 




17 




00011000 




18 




00011001 




19 




00011010 




1A 




00011011 




1B 




00011100 




1C 




00011101 




1D 




00011110 




IE 




00011111 




1F 




00100000 




20 




00100001 




21 




00100010 




22 




00100011 




23 




nmnnmn 

UU 1 UU 1 uu 








00100101 




25 




00100110 




26 




00100111 




27 




00101000 




28 




00101001 




29 




00101010 




2A 




00101011 




28 




00101100 




2C 




00101101 




2D 




00101110 




2E 




00101111 




2F 




00110000 




30 




00110001 




31 




00110010 




32 





Code 


Graphic 


Entry 


Replaced 
By /Takes 
Place Of 


00110011 




33 




00110100 




34 




00110101 




35 




00110110 




36 




00110111 




37 




00111000 




38 




00111001 




39 




00111010 




3A 




00111011 




3B 




00111100 




3C 




00111101 




3D 




00111110 




3E 




001 1 1 1 1 1 




3F 




01000000 


Blank 


40 




01000001 




41 




01000010 




42 




01000011 




43 




01000100 




44 




01000101 




45 




01000110 




46 




01000111 




47 




01001000 




48 




01001001 




49 




01001010 




4A 




01001011 




4B 




01001100 


< 


4C 




01001101 


( 


4D 




01001110 . 


+ 


4E 




01001111 


I 


4F 




01010000 


& 


50 




01010001 




51 




01010010 




52 




01010011 




53 




01010100 




54 




01010101 




55 




01010110 




56. 




01010111 




57 




01011000 




58 




01011001 




-5? - 




01011010 


t 


5A 




01011011 


$ 


5B 




01011100 




5C 




01011101 


) 


5D 




01011110 




5E 




01011111 


1 


5F 




01100000 




60 




01100001 


1 


61 




01100010 




62 




01100011 




63 




01100100 




64 




01100101 




65 





Code 


Graphic 


Entry 


Replaced 
By/Takes 
Place Of 


01100110 




66 




01100111 




67 




01101000 




68 




01101001 




69 




01101010 




6A 




01101011 




6B 




01101100 


% 


6C 




01101101 


_ 


6D 




01101110 


> 


6E 




01101111 




6F 




01110000 




70 




0111OO01 




71 




01110010 




72 




01110011 




73 




01110100 




74 




01110101 




75 




01110110 




76 




01110111 




77 




01111000 




78 




01111001 




79 




01111010 




7A 




01111011 


# 


7B 




01111100 


@ 


7C 




01111101 




7D 




01111110 


= 


7E 




01111111 




7F 




10000000 




80 




10000001 




81 




10000010 




82 




10000011 




83 




10000100 




84 




10000101 




85 




10000110 




86 




100001 1 1 




87 




10001000 




88 




10001001 




89 




10001010 




8A 




10001011 




8B 




10001100 




8C 




10001101 




8D 




10001110 




8E 




10001111 




8F 




10010000 




90 




10010001 




91 




10010010 




92 




10010011 




93 




10010100 




94 




10010101 




95 




10010110 




96 




10010111 




97 




10011000 




98 





Code 


Graphic 


Entry 


Replaced 
By/Takes 
Place Of 


10011001 




99 




10011010 




9A 




10011011 




9B 




10011100 




9C 




10011101 




9D 




10011110 




9E 




100,11111 




9F 




10100000 




AO 




10100001 




A1 




10100010 




A2 




10100011 




A3 




10100100 




A4 




10100101 




A5 




10100110 




A6 




10100111 




A7 




10101000 




A8 




10101001 




A9 




10101010 




AA 




10101011 




AB 




10101100 




AC 




10101101 




AD 




10101110 




AE 




10101111 




AF 




10110000 




B0 




10110001 




B1 




10110010 




B2 




10110011 




B3 




10110100 




B4 




10110101 




B5 




10110110 




B6 




10110111 




B7 




10111000 




B8 




10111001 




B9 




10111010 




BA 




10111011 




BB 




10111100 




BC 




1011 1 101 








10111110 




BE 




10111111 




BF 




11000000 




CO 




11000001 


A 


C1 




11000010 


B 


C2 




11000011 


c 


C3 




11000100 


D 


C4 




11000101 


E 


C5 




11000110 


F 


C6 




11000111 


G 


C7 




11001000 


H 


C8 




11001001 


I 


C9 




11001010 




CA 




11001011 




CB 





Code 


Graphic 


Entry 


Replaced 
By /Takes 
Place Of 


11001100 




CC 




11001101 




CD 




11001110 




CE 




11001111 




CF 




11010000 


> 


DO 




11010001 


J 


D1 




11010010 


K 


D2 


i i 


11010011 


L 


D3 




11010100 


M 


D4 




11010101 


N 


D5 




11010110 


0 


D6 




11010111 


p 


D7 




11011000 


Q 


D8 




11011001 


R . 


D9 




11011010 




DA 




11011011 




DB 




11011100 




DC 




11011101 




DD 




11011110 




DE 




11011111 




DF 




11100000 




E0 




11100001 




E1 




11100010 


S 


E2 




11100011 


T 


E3 




11100100 


U 


E4 




11100101 


V 


E5 




11100110 


w 


E6 




11100111 


X 


E7 




11101000 


Y 


E8 




11101001 


.Z 


E9 




11101010 




EA 




11101011 




EB 




11101100 




EC 




11101101 




ED 




11101110 




EE 




11101111 




EF 




111 10000 




FO 




11110001 


1 


F1 




11110010 


2 


F2 




11110011 


3 


F3 




11110100 


4 


F4 




11110101 


5 


F5 




11110110 


6 


F6 




11110111 


7 


F7 




11111000 


8 


F8 




11111001 


9 


F9 




11111010 




FA 




11111011 




FB 




11111100 




FC 




11111101 




FD 




11111110 




FE 




11111111 




FF 





Hexadecimal numbers of characters in the standard collating sequences. 



Where you record the hexadecimal number of the character you are going 
to put in that relative position in the sequence. 



Appendix C. Header, Record Type, and Field Specification Column Summaries 



HEADER SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


000 


Header line number. 




H 


Header line identification. 


7-12 


SORTA 


Addrout sort job. 


SORTR 


Tagalong sort job. 


SORTRS 


Summary tagalong sort job. 


13-17 


1-256 


Largest sum (in bytes) of control field lengths for any record type. 


18 


A 


Records in sorted file to be in ascending order by control fields. 


D 


Records in sorted file to be in descending order by control fields. 


S 


Not used in System/32 sort jobs. 


19-25 


Blank 


Not used in System/32 sort jobs. 


26 


Blank 


Use standard collating sequence in compare operations. 


s 


Use an alternate collating sequence in compare operations. ALTSEQ 
statements will define the collating sequence to be used. 


27 


0 or Blank 


Print: Sequence specif ications. 
Diagnostic messages. 
Program-status messages. 
Action messages. 
Formatted messages. 


1 


Print: Program-status messages. 
Action messages. 
Formatted messages. 


2 


Print: Action messages. 

Formatted messages. 


3 


Print nothing (except formatted messages). 


28 


Blank 


Keep control fields in output records in tagalong sort jobs. 


X 


Drop control fields from output records in tagalong sort jobs. 


vtm'////////// 


1-4096 


Length (in bytes) of output records in tagalong sort jobs. 


33 


Blank 


Not used in System/32 sort jobs. 


34 


N 


Data written on the work file will not be verified. 


Blank or character 
other than N 


Data written on the work file will be verified. 


35 


Blank 


Reserved for system use. 


36 


Blank 


Operator message SORT-7724 will be issued. 


N 


Operator message SORT-7724 will not be issued. 


37-39 


Blank 


Not used in System/32 sort jobs. 


40-72 


Any characters 


Comments. 






Columns that must be filled in for all sort jobs. 
Columns that must be filled in for a tagalong sort. 
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RECORD TYPE SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Entries 


Explanation 


1-2 


00-99 


Page number. 


3-5 


01x-06x 


Line number. You can leave column 5 (x) blank, or enter any value to 
keep the specifications in ascending order. 


6 


I 


Include line. 


O 


Omit line. 


7 


Blank 


This is the first line of a set of I or O record type lines. 


A 


AND lines. These specifications continue the definition of the record 
described on the preceding line. 


O 


OR line. These specifications define a different type of record than the 
one on the previous line. 


* 


Comment line. 


8 


C 


Use both zone and digit portions of characters. 


z 


Use only zone portion of a 1 -character field. 


D 


Use only digit portions of characters. 


P 


Signed packed decimal data. 


U 


Signed unpacked decimal data. 


9-12 


1-4096 


The input record position in which the factor 1 field begins (blank if 
field is only one position long). 


13*18 


1-4096 


The Input record position in which the factor 1 field ends. 


1718 


EQ 


Factor 1 must equal factor 2. 


NE 


Factor 1 must not equal factor 2. 


LT 


Factor 1 must be less than factor 2. 


GT 


Factor 1 must be greater than factor 2. 


i p 

i-C 


Paptnr 1 muct ho locc than nf oniifil +r* fartor V 


GE 


Factor 1 must be greater than or equal to'factor 2. 


19 


F 


Factor 2 is another field in the same input record. 


C 


Factor 2 is a constant. 


K 


Factor 2 is a keyword. 


20-23 


1-4096 


The input record position in which the factor 2 field begins (blank if 
field is only one position long). 


24-27 


1-4096 


The input record position in which the factor 2 field ends. 


20-39- 


Any characters 


The factor 2 constant. 


40-72 


Any characters 


Comments. 




Columns that must be filled in. 
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FIELD SPECIFICATION COLUMN SUMMARY 



Column Summary 


Columns 


Contpntc 

Wvl 1 LCI 1 


Fynlanatinn 


1-2 


00-99 


Panp niimhpr 
rctyc iiuiiiLicf. 


3-5 


07x-14x 


Line number. You can leave column 5 (x) blank, or enter any value to 
kppn thp snprif irations in avpnriinn orrlpr 

l\C(.|>/ LI t\* jpcwl 1 ll/Qilvl 14 III QOuCI IUII IM Ut UCI ■ 


6 


F 


Fiplrl soppif ipatinn linp 

1 ICIU upCul 1 IUQLIUI 1 1 1 1 1 v> • 


7 


N 


Normal control field. k 


o 


Dnnnsitp control fiplH 

Vy|<^|h/UOI IU WUI III Ul lldvj. 


F 


Forced control field. 


D 


Data field. 


s 


Summary data field. 


* 


Comment line. 


8 


C 


Use both zone and digit portions of characters in the field. 


z 


Use only zone portion of 1 -character field. 


D 


Use only digit portions of characters in the field. 


P 


Signed packed decimal data. 


u 


Signed unpacked decimal data. 


V 


Force a data character into the data field. 




1-4096 


Start position of a field in the record (can be blank if the field is one 
character long). 


13-16 


1 -4096 


End position of a field in the record. 




Any character 


Forced control fields; the character you want the program to change. 
Also used for summary overflow indicator fields; the character to be 
used for the overflow indicator. 


W/////A 


Any character 


Forced control fields; the character you want the program to substitute. 
Also used for summary overflow indicator fields; the character that the 
overflow field is initialized to. 


w////i 


Blank 


Forced control field line is not a continuation of the preceding line. 


Any character other 
than blank 


Forced control field line is a continuation of the preceding line. 


20-22 


1-256 


Overflow field length entry for summary tagalong sort only. 


23-39 


Blank 


Reserved for system use. 


40-72 


Any characters 


Comments. 




Columns that must be filled in for all sort jobs. 

Columns that must be filled in when forced control fields are being used. 
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Appendix D. Integer (Binary) and Real Number Sorting 



This appendix indicates how either positive and negative 
integers or positive and negative real numbers in control 
fields can be used to sort records in a file. 

Coded sequence specifications sheets for sample sort jobs 
are included, followed by a brief discussion of the entries 
made on the sheets. 

Note: For detailed discussion of sequence specifications 
sheet entries, see Chapters 2, 3, and 4; see also Chapter 7, 
Sample Sort Jobs. 



SAMPLE SORT JOB 1 . SORTING ON A CONTROL 
FIELD THAT CONTAINS EITHER A POSITIVE 
INTEGER OR A POSITIVE REAL NUMBER 



IBM 



International Business Machines Corporation 

SEQUENCE SPECIFICATIONS 
Header 



Program f 
Identification L 



GX21 -9089-3 
Printed in U.S.A. 
75 76 77 78 79 80 



Card: MATCH, 
SORT, SELECT, 
MERGE 



°H°l"adR]Tlti I I I I Ma 



Largest sum 
(in bytes! 
of Control Field 
Lengths for Any 
Record Type 

13 14 15 16 17 



Output 
Record 
Length 

29 30 31 32 



CCP/ Disk Sort Only 

yj Record 
£| Length 



40 41 42 43 |44 45 46 ■ 



50 51 52 53 54 55 56 57 58 59 60 61 62 63 I 



Record Type 



Line 


| -J Continuation (A/0/*)| 


| » C/Z/D/P/U | 


Factor 1 


Rel. 

EQ 
NE 
LT 
GT 
LE 
GE 

17 18 


Factor 2 (Field, Constant, or Keyword) 


Comments 


Number 
3 4 5 


|o> Type (I/O) | 


Ss | Loca 

' From 
9 ,10 11 12 


tion 

To 

13 14 15 16 


|3 F/C/K I 


* Keywo 

Loc 

From 
20 21 22 23 


Constant 1» 

d-H 

tion | 
To 1 

24 25 26 27|28 29 30 31 32 33 34 35 36 37 38 39 


i 

Record 1 
Name | 

40 41 42 43 44 45 46 47|48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 


0 


1 






































































































































0 


2 






































































































































D 


3 






































































































































0 


4 






































































































































0 


5 






































































































































0 


6 




















































































I 



















































Field 



Line 


3 
3 

2 

> 
H 

7 


| co (C/Z/D/P/U/V) | 




Forced 


Overflow 

Field 

Length 

20 21 22 
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Header Specification 



Record Type Specifications 



Column 6 



H identifies the line as a header line. 



Because all input records are being used and all have the 
same field specifications, no record type specifications are 
needed (include-all is implied). 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 
Columns 13-17 

The control field that contains either a positive integer 
or a positive real number has a length of 4 (the entry in 
column 17). 

Column 18 

The A specifies ascending order. The smallest positive 
integer or positive real number comes first; the largest 
positive integer or positive real number comes last in the 
sort sequence. 



Field Specifications 

Column 6 

F identifies the lines as field specification lines. 



Columns 7, 8, and 9-16 

Line 07 indicates that the control field is in positions 1 
through 4 of the input record. This control field is included 
in the sorted output file (column 28 of the header line is 
blank). 

Line 08 indicates that the other 60 input record characters 
are included as data in the sorted output file. 



Columns 29-32 

The control field is not dropped when writing to the output 
file (column 28 is blank). Therefore, the length of the out- 
put record equals the length of the control field (4 bytes) 
added to the length of the data field (60 characters) speci- 
fied by lines 07 and 08. This output record length totals 
64, which is the entry for columns 29 through 32. 
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SAMPLE SORT JOB 2. SORTING ON A CONTROL 
FIELD THAT CONTAINS ONLY A POSITIVE OR 
NEGATIVE INTEGER 
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IBM 



International Business Machines Corporation 
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Header Specification 

Column 6 

H identifies the line as a header line. 
Columns 7-12 

SORTR identifies the job as a tagalong sort. 
Columns 13-17 

The total length of the control field (for either a positive or 
a negative integer) is 5 bytes (the entry in column 17). 



Column 18 

The A stands for ascending order. Since negative integers 
are stored in two's complement form, the smallest negative 
integer comes first; the largest positive integer comes last in 
the sort sequence (for example: -2, -1,0, 1, 2). 

Column 28 

X indicates that the control field is dropped when writing 
to the output file. 

Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 
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Record Type Specifications 

Column 6 

Two record types are specified (positive integers and 
negative integers). Both record types are to be included 
(I in column 6 of line 01, pages 01 and 02). 

Columns 8, 9- 16, 17- 18, 19, and 20-39 

On line 01 (page 01), these columns specify that if position 1 
(the leftmost byte of the 4-byte control field from the input 
record) is less than or equal to the character constant " (see 
note), the work record will have a character 2 forced into 
the first byte of its 5-byte control field (line 07 on page 01). 
This include line selects only positive integers. Line 01 
(page 02), which is an include-all line, indicates that all 
records not described by the first include line (page 01) are 
also included in the sort. The first include line (line 01, 
page 01 ) selects ail positive integers; however, this page 02 
include-all line selects all negative integers, which will have 
a character 1 forced into the first byte of their work record 
control field (line 07 on page 02). All negative integers are 
forced in front of all positive integers in the sort sequence. 

Note: The special character " has a bit configuration of 
01111111, which is equivalent to the high order byte of 
the maximum positive integer. 



Field Specifications 

Column 6 

F identifies the lines on pages 01 and 02 as field specifica- 
tion lines. 



Columns 7, 8, 9- 16, and 18 

On line 07 (pages 01 and 02), these columns specify that for 
positive integers (line 07 on page 01), a character 2 will be 
forced into the first byte of the work record control field; 
for negative integers (line 07 on page 02), a character 1 will 
be forced into the first byte of the work record control field. 

On line 08 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that the control field is in positions 1 through 4 
of the input records. (The control field is not included in 
the output records because header specification column 28, 
page 01 , contains an X.) 

On line 09 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that 64 input record characters are included as 
data in the sorted output file. 
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SAMPLE SORT JOB 3. SORTING ON A CONTROL 
FIELD THAT CONTAINS ONLY A POSITIVE OR 
NEGATIVE REAL NUMBER 
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Column 18 



Header Specification 

Column 6 

H identifies the line as a header line. 
Columns 7-12 

SORTR identifies the job as a tagalong sort. 

Columns 13-17 

The total length of the control field (for either a positive or 
negative real number) is 5 bytes (the entry in column 17). 



The A stands for ascending order. The smallest negative 
real number comes first; the largest positive real number 
comes last in the sort sequence (for example: -2.0, -1.0, 
0.0, 1.0,2.0). 

Column 28 

X indicates that the control field is dropped when writing 
to the output file. 

Columns 29-32 

When the control field is dropped, only the data portion 
remains. The data portion in this sample job is the entire 
input record. Therefore, 64 is entered in columns 29 
through 32. 
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Record Type Specifications 

Column 6 

Two record types are specified (positive real numbers and 
negative real numbers). Both types are to be included (I in 
column 6 of line 01, pages 01 and 02). 

Columns 8 ,9-16, 17-18, 19, and 20-39 

On line 01 (page 01), these columns specify that if position 1 
(the leftmost byte of the real number, 4-byte control field 
from the input record) is less than or equal to the character 
constant " (see note), the work record will have a character 
2 forced into the first byte of its 5-byte control field (line 
07 on page 01). This include line selects only positive real 
numbers. Line 01 (page 02), which is an include-all line, 
indicates that all records not described by the first include 
line (page 01) are also included in the sort. The first include 
line (line 01 on page 01) selects all positive real numbers; 
however, this page 02 include-all line selects all negative real 
numbers, which will have a character 1 forced into the first 
byte of their work record control field (line 07 on page 02). 
All negative real numbers are forced in front of all positive 
real numbers in the sort sequence. 

Note: The special character " has a bit configuration of 
01 1 1 1 1 1 1, which is equivalent to the high order byte of 
the maximum positive real number. 

Field Specifications 

Column 6 

F identifies the lines on pages 01 and 02 as field specifica- 
tion lines. 



Columns 7, 8, 9-16, and 18 

On line 07 (pages 01 and 02), these columns specify that for 
positive real numbers (line 07 on page 01), a character 2 will 
be forced into the first byte of the work record control 
field; for negative real numbers (line 07 on page 02), a 
character 1 will be forced into the first byte of the work 
record control field. 



On line 08 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that the control field is in positions 1 through 4 
of the input records. Note that real numbers are always 
carried in true form (never in two's complement form). 
Therefore, sorting negative real numbers into ascending 
sequence requires them (when treated as character fields) 
to be sorted into descending sequence. The O in column 7, 
line 08 on page 02 indicates an opposite control field, 
which means that the negative real numbers will be sorted 
in descending sequence. 

On line 09 (pages 01 and 02), columns 7, 8, and 9 through 
16 specify that 64 input record characters are included as 
data in the sorted output file. 



SAMPLE SORT JOB 4. RECORD SELECTION BASED 
ON BINARY VALUES 

Records can be selected based on a binary value by using 
one or both of the following types of include sequences. 

Type 1 Include Sequence 

For binary values whose hexadecimal equivalents can be 
represented by one or two characters in the 64-character set 
(Appendix B, Standard EBCDIC Collating Sequence table), 
use either an include character (I and C in columns 6 and 8 
of the record type specifications) or an include zone (I and 
Z in columns 6 and 8 of the record type specifications) 
ANDed with an include digit (IAD in columns 6 through 8 
of the record type specifications). 

Type 2 Include Sequence 

For binary values whose hexadecimal zone portions do not 
appear in the 64-character set, use two include specifications 
for the zone portion ANDed with an include digit for the 
digit portion. 

Example: Select records that contain a binary value of 44 
in position 2. The binary representation of this number is 
0010 1 100, which is a hex 2C. For the digit portion, select 
a character from the table in Appendix B with a digit por- 
tion of C (for example, < f *, %, and @). Use this character 
in an include line, comparing to the digit portion only. Since 
there is no character in the 64-character set whose zone 
portion is equivalent to 2, use two include lines to describe 
constants with a zone portion greater than 1 and less than 
or equal to 2. Describe these constants as packed, which 
reverses the zone and digit portions from hex F1 and F2 
to hex 1F and 2F. 
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The record type specifications shown will cause selection of 
all records containing (in column 2) a value between binary 
31 (hex 1 F) and binary 47 (hex 2F) whose digit portion is 
equal to C. 

Note: The 32 hexadecimal values whose zone portions are 
either A or B cannot be accessed with these types of entries. 
Therefore, there can be no record selection based on these 
values. 



Sample Sort Job 4 Description 

The purpose of this sample job is to select records from an 
inventory file whose reorder point is 7800. The reorder 
point is a 2-byte quantity in columns 44 and 45 of the 
inventory records. The quantity is stored in binary (7800 = 
0001 1110 0111 1000), and the hexadecimal representation 
of this number is hex 1E78. (Use the IBM System /32 and 
System/34 Basic Assembler Reference Card, GX2 1-7674, 
to help with binary and hexadecimal conversions.) 
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These specifications will cause selection of all records con- 
taining (in column 44) a value between 15 (hex OF) and 
31 (hex 1 F) whose digit portion is equal to E. They will 
further limit selection of records to those which have a 
binary value in column 45 whose zone portion equals 7 and 
whose digit portion equals 8. Therefore, all records selected 
will have hex 1 E78 in columns 44 and 45. 



Header Specification 

Column 6 

H identifies the line as a header line. 



Columns 7-12 

SORTR identifies the job as a tagalong sort. 
Columns 13-17 

The total length of the control field is 6 bytes. 
Column 18 

The A stands for ascending order. The file will be sorted 
according to the standard collating sequence shown in 
Appendix B. 



Record Type Specifications 

Line 01 (ID) selects records whose digit portion in column 
44 is E. Lines 02 and 03 select records whose packed value 
in column 44 is less than or equal to hex 1 F, and at the 
same time is greater than a packed value of hex OF. 

The only hexadecimal values that satisfy both specifications 
for lines 02 and 03 are hex 1 1 through hex 1 F. Line 04 is a 
comment line. Lines 05 and 06 select records whose zone 
portion in column 45 is 7 and whose digit portion is 8. 



Field Specifications 

Column 6 

F identifies the lines as field specification lines. 



Columns 7, 8, and 9- 16 

Line 07 indicates that the control field is in positions 1 
through 6 of the input records. Only the digit portions 
of the characters will be used. This control field will be 
included in the output file. 

Line 08 indicates that the other 105 input record characters 
are included as data in the output file. 



Columns 29-32 

The control field is not dropped when writing to the output 
file (column 28 is blank). Therefore, the length of the out- 
put record equals the length of the control field (6 bytes) 
plus the length of the data field (105 characters) specified 
by lines 07 and 08. This output record length totals 111, 
which is the entry for columns 29 through 32. 
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Appendix E. Sort Programmer Messages 



Sort programmer messages are activated (or suppressed) by 
the print option in the header statement. These messages, 
if activated, are displayed (only a portion of the message 
actually appears on the display screen), and they are printed 
if SYSLOG is assigned to the printer. Generally, SYSLOG 
should be assigned to the printer if sort programmer 
messages are activated. 

Sort programmer messages are issued mainly during the 
generation phase of the sort program. No operator action 
is required. Therefore, each message description in this 
section consists only of a simple explanation for the 
programmer. 

To understand these messages, you must have a basic under- 
standing of how the sort program works. Specifically, it is 
helpful to know what happens during the generation phase 
and during the execution phase. 

The generation phase translates your sequence specifications 
into machine language. 

The execution phase gets the records you want sorted, sorts 
the records, and writes the sorted records onto the output 
file in the order that you want them. 



Spec,' 



We, 




Generation 
Phase 



Data Flow 



Control Flow 



Execution 
Phase 




Following is a typical sort diagnostic message as it appears 
on a listing: 



SORT-7264 W 



SPECIFICATION IN WRONG 
NUMERICAL ORDER 



Note that a one-character alphabetic code, which indicates 
the significance of the message, follows the message 
identification code. 



Code Meaning 

T Terminal 



Severe 



W Warning 



Action 



Information 



Significance 

Processing cannot continue. 
The program ends immediately 
and no more processing is done. 
Sort operator message SORT- 
7725 follows and the operator 
must cancel the job. For an 
explanation of the sort operator 
messages see Sort Operator 
Messages in the IBM System/32 
Displayed Messages Guide, 
GC2 1-7704. 

A sort sequence specification 
statement contains an error. 
When the generation phase is 
complete, sort operator message 
SORT-7725 is issued and the 
operator must cancel the job. 
For an explanation of the sort 
operator messages see Sort 
Operator Messages in the IBM 
System/32 Displayed Messages 
Guide, GC2 1-7704. 

An error condition might exist. 
Corrective action is required if 
the condition is unintentional. 
When the generation phase is 
complete, sort operator message 
SORT-7722 is issued. For an 
explanation of the sort operator 
messages see Sort Operator 
Messages in the IBM System/32 
Displayed Messages Guide, 
GC21-7704. 

A condition exists that requires 
an operator response. A sort 
operator message follows. For 
an explanation of the sort opera- 
tor messages see Sort Operator 
Messages in the IBM System/32 
Displayed Messages Guide, 
GC21-7704. 

For information only. Messages 
with an I code indicate the 
current status of the job. 
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SORT-7101 I PRINT OPTION ASSUMED 
TO BE 0 

The print option in the header line is not blank, 0, 1, 2, 
or 3. Therefore, it is assumed to be 0. 



SORT-7102 W SORT JOB ASSUMED TO 
BE SORTR 

Neither SORT A, SORTR, or SORTRS job type is 
specified on the header line. Becuase an output record 
length is specified, SORTR is assumed. To avoid this 
error, correct columns 7 through 12 of the header line. 



SORT-7103 T SORT JOB TYPE NOT 
SPECIFIED 

Neither a job type nor an output record length is 
specified in the header line. Place the proper job type 
in columns 7 through 12 of the header line. Resubmit 
the job. 



SORT-7105 W INVALID ENTRY, 
COLUMN 36 

Column 36 of the header line does not contain an 
N or a blank. A blank is assumed. To avoid this 
error next time the job is run, specify either N or 
blank in column 36 of the header line. 



SORT-7108 T INPUT/OUTPUT FILE 
STATEMENT MISSING 

The //FILE statements for the input file, the output 
file, or both are missing for this job. Include the missing 
//FILE statement; then resubmit the job. 



SORT-7150 S CONTROL FIELD 

DROPPED-NO DATA 
SPECIFICATIONS 

No data specifications (including summary 
specifications) were entered for this job, but the control 
field is being dropped. If the job were allowed to 
continue, the output file would contain all blanks. Add 
data field specifications to the job and/or retain the 
control field; then resubmit the job. 



SORT-7151 T CONTROL FIELD LENGTH 
NOT GIVEN 

No control field length is specified on the header line 
for this job. Place the length of your control fields in 
columns 13 through 17 of the header line; then 
resubmit the job. 



SORT-7152 S CONTROL FIELD LENGTH 
TOO LARGE 

The length specified for the control field is too large. 
A length of 256 is assumed. Specify a control field 
length of 256 or less in columns 13 through 17 of the 
header line; then resubmit the job. 



SORT-7153 T INPUT RECORD LENGTH 
NOT GIVEN 

The record length for the input file cannot be deter- 
mined from the information stored on the disk. If this 
error occurs often, contact IBM for program support 
services. 
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SORT-7154 W ASCENDING SEQUENCE 
ASSUMED A, COLUMN 18 



SORT-7159 S WORK RECORD LENGTH 
TOO LARGE 



Column 18 of the header line contains neither D, for 
descending sequence, nor A, for ascending sequence. 
Ascending sequence is assumed. To avoid this error 
next time the job is run, specify either A or D in 
column 18 of the header line. 



The work record length for this job is too large. For 
information on how to determine the maximum work 
record length, see Appendix A, Calculating the Sizes 
of Files for Sort. 



SORT-7155 W OUTPUT OPTION 

ASSUMED X, COLUMN 28 

Column 28 of the header line contains neither X nor 
blank. Output option X is assumed. To avoid this error 
next time the job is run, specify either X or blank in 
column 28 of the header line. 



SORT-7160 W ALTERNATE COLLATING 
SEQUENCE ASSUMED 

Column 26 of the header line does not contain an S or 
a blank. Alternate collating sequence is assumed. If 
alternate collating sequence is not to be used, specify a 
blank in column 26 of the header line; then resubmit 
the job. If alternate collating sequence is correct, place 
an S in column 26 to avoid this occurring again. 



SORT-7156 S OUTPUT RECORD LENGTH 
NOT SPECIFIED 

This is a SORTR or SORTRS job, but no output record 
length is specified on the header line. The maximum 
length of 4096 is assumed. Specify the length of the 
output records in columns 29 through 32 of the header 
line; then resubmit the job. 



SORT-7161 T INVALID CONTROL FIELD 
LENGTH 

A nonnumeric character or an embedded blank was 
specified in columns 13 through 17 of the header line. 
Correct the entry, making sure that no nonnumeric 
characters or embedded blanks are specified; then 
resubmit the job. 



SORT-7157 S OUTPUT RECORD LENGTH 
TOO LARGE 

This is a SORTR or SORTRS job. The output record 
length specified in columns 29 through 32 of the header 
line is larger than 4096. The maximum length of 4096 
is assumed. Be sure the header line is not shifted by one 
or more columns. Specify an output record length of 
4096 or less; then resubmit the job. 



SORT-7162 T INVALID OUTPUT RECORD 
LENGTH 

A nonnumeric character or an embedded blank was 
specified in columns 29 through 32 of the header line. 
Correct the entry, making sure that no nonnumeric 
characters or embedded blanks are specified; then 
resubmit the job. 



SORT-7158 S OUTPUT RECORD LENGTH 
INCONSISTENT 

This is a SORTR or SORTRS job and you are not 
dropping the control field. The output record length 
(columns 29 through 32) that includes the control field 
should not be less than the length of the control field 
(columns 13 through 17). Be sure you do not want to 
drop the control field. Recompute the output record 
length; correct the entry on the header line; then 
resubmit the job. 



SORT-7176 S INVALID ALTERNATE 
SEQUENCE STATEMENT 

Column 26 of the header line specifies that an alternate 
sequence is to be used, but the statement just read is not 
a comment statement or a valid sort specification state- 
ment, nor does it contain ALTSEQtjfcJ in columns 1 
through 8. Correct the incorrect statement or delete it 
if it does not belong in the job; or add a valid alternate 
sequence statement. 
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SORT-7177 W MISSING THE DOUBLE 

ASTERISK (**) STATEMENT 



SORT-7202 S INVALID SPECIFICATION 
TYPE, COLUMN 6 



No statement containing asterisks (*) in columns 1 and 
2 was between the alternate sequence statement and the 
include, omit, or field specification statement. The 
sort program assumes an ** statement following the 
alternate sequence statement. To avoid this error next 
time the job is run, place an ** statement between the 
alternate sequence statement and the include, omit, or 
field specification statement. 



A specification is not identified in column 6 as a valid 
type of specification. Valid specification types are 
comments, include sets, omit sets, or field specifica- 
tions. The specification is bypassed and the rest of the 
specifications are processed. The specification was 
probably specified incorrectly or misplaced in the job. 
Correct the error; then resubmit the job. 



SORT-7178 S ALTSEQ STATEMENT HAS 
INVALID DATA 

An alternate sequence statement entry that is used to 
alter the normal sequence is in error. One of the four- 
position groups (columns 9 through 12, 13 through 16, 
and so on) in the ALTSEQ statement does not contain 
a valid hex character (0 through 9 or A through F). An 
asterisk (*) flags the columns in error on the source 
listing. Processing continues with the next four-position 
group. Correct the incorrect alternate sequence state- 
ment; then resubmit the job. 



SORT-7179 T UNEXPECTED END OF Fl LE 
FOUND 

An end-of-file statement followed the alternate sequence 
statement. No comment statement or ** statement 
exists. Check that the last part of the sequence specifica- 
tion is not missing from the job or that an end-of-file 
statement is not placed incorrectly in the job. 



SORT-7181 W NO VALI D ALTSEQ 

STATEMENTS FOUND 

ALTSEQ is specified on the header line, but no valid 
ALTSEQ statements were entered. The sort program 
ignores the ALTSEQ specification on the header line. 
If an alternate collating sequence is to be used, correct 
the invalid ALTSEQ statements, or add them if none 
were specified; then resubmit the job. If alternate 
collating sequence is not to be used, leave column 26 
of the header line blank to avoid this message. 



SORT-7204 W BLANK CONTINUATION 
ASSUMED, COLUMN 7 

A nonblank character is specified in column 7 of a 
specification that is the first in an omit or include set; 
a blank is expected. The sort program assumes a blank 
in column 7. To avoid this message, leave column 7 
blank. 



SORT-7206 S INVALID CONTINUATION, 
COLUMN 7 

A character other than A, 0, or blank is specified in 
column 7 of a specification that is part of an omit or 
include set. The specification is ignored and the next 
specification is processed. Correct the specification by 
placing an A or 0 in column 7; then resubmit the job. 



SORT-7208 W OR CONTINUATION 
ASSUMED, COLUMN 7 

A blank is specified in column 7 of a statement that is 
part of an omit or include set. Column 7 should be A 
or 0. O is assumed. If 0 is incorrect, enter an A in 
column 7; then resubmit the job. If 0 is correct, place 
an O in column 7 to avoid this message. 
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SORT-7210 W INVALID C/Z/D/P/U/V 

SPECIFICATION, COLUMN 8 



SORT-7216 S LAST SET NOT A VALID 
INCLUDE SET 



An invalid entry is specified in column 8 of a specifica- 
tion statement. The valid entries are: 



Specification Type 

Include or omit record type 
Control field 

Data field or summary field 



Column 8 Entry 

C, Z, D, P, or U 
C, Z, D, P, or U 
C, Z, D, P, U, or V 



The sort program assumes a C in column 8. If C is 
incorrect, place the correct entry in column 8; then 
resubmit the job. If C is correct, place a C in column 
8 to avoid this message. 

Note: When the specification type is an include or omit 
record type and factor 2 is a keyword, column 8 must 
contain a C. When the specification type is a control 
field and you want an unconditional force or a force-all 
line, column 8 must contain a C. 



The last set of sequence specifications should be an 
include set, but one of the following occurred: 

— No specifications were specified after the 
header line. 

— The last set was an omit set. 

— The last set was an include set that contained 
no field specifications. 

Make one of the following corrections, depending on 
the condition that caused the message; then resubmit 
the job: 

— Supply the sequence specifications for the job. 

— Eliminate the omit set; the records are omitted by 
default. 

— Supply the missing field specifications. 



SORT-7218 S 



TOO MANY SEQUENCE 
SPECIFICATIONS 



SORT-7212 S SPECIFICATION IN WRONG 
LOGICAL ORDER 

The specification in error is either: 

— A control field specification (F in column 6) that 
incorrectly follows an omit specification (0 in 
column 6). 

— An omit specification (0 in column 6) that in- 
correctly follows an include specification (I in 
column 6). 

The specification is bypassed and the next specification 
is processed. Put the specifications in the correct order, 
then resubmit the job. 



SORT-7214 S INCLUDE OR OMIT 
STATEMENT AFTER 
INCLUDE-ALL 

An INCLUDE-ALL specification was read for this job, 
but an include or omit specification (I or 0 in column 6) 
was found. Only control field specifications should 
follow the INCLUDE-ALL specification. The specifica- 
tions are processed as though the INCLUDE-ALL 
specification was not read. Remove either the 
INCLUDE-ALL specification or the include or omit 
specifications; then resubmit the job. 



All the main storage allocated by the sort program for 
the select/build routine and for error information was 
used, but there are still specifications to be processed. 
The remaining specifications are checked for errors. 
Remove all causes for error messages from the specifica- 
tions; then resubmit the job. If this error occurs again 
and no other error messages are issued, you must 
decrease the number of sequence specifications. 



SORT-7220 T TOO MANY ERRORS 

The main storage allocated by the sort program for the 
select/build routine and for error information was filled 
with error information. No more specifications can be 
processed. Correct all diagnosed errors; then resubmit 
the job. 
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SORT-7222 W ZONE OR V FIELD LENGTH 
EXCEEDS 1 



SORT-7228 W CHARACTER CONSTANT 
LENGTH EXCEEDS 20 



The referenced specification is a field specification (F 
in column 6). The type specified is a zone field (Z in 
column 8) or a V field (V in column 8) that should 
have a length of one byte. 

The specified number of bytes (calculated using 
columns 9 through 12 and 13 through 16) is used in 
building the work record field for this record type. 
The byte zone or overflow information generated is 
placed in the rightmost byte (low-order byte) of this 
field. The other positions to the left contain binary 
zeros (control fields) or blanks (data fields). If a one- 
byte zone or V field is incorrect, correct the field 
specification; then resubmit the job. 



SORT-7224 S COLUMNS 9-16 OR 

COLUMNS 20-27 ARE 
INVALID 

The location information (columns 9 through 16 and/or 
columns 20 through 27) in a specification is invalid 
because: 

— The From location is greater than the To location. 

— The To location is 0 or blank. 

— The lengths of factor 1 and factor 2 are not equal. 
Correct the error; then resubmit the job. 



SORT-7225 S INVALID KEYWORD 

BEGINNING IN COLUMN 20 

The specification causing this error is an include or omit 
record type specification. A K was found in column 19, 
but neither UDATE, UMONTH, UDAY nor UYEAR 
was found beginning in column 20. UDATE is assumed. 
Correct the specification; then resubmit the job. 



SORT-7226 W DIGIT FIELD LENGTH 
EXCEEDS 16 

A digit field length of more than 16 was specified in 
the specifications. A length of 16 is assumed. If the 
digit field length is actually 16 or less, correct the 
specification. If the digit field length is greater than 
1 6, divide it into two different fields and create new 
specifications for these fields; then resubmit the job. 



The specification causing this error is an include or omit 
specification (I or O in column 6). Since a C is specified 
in columns 19, factor 2 is a character constant. The 
length implied by factor 1 (columns 9 through 12 and 
13 through 16) is greater than 20, the maximum 
allowed. The 20 rightmost characters in factor 1 are 
compared against the constant in columns 20 through 39 
for this job. Correct the specification statement if a 
20-character field is not correct or to avoid this message. 



SORT-7230 W SAME SPECIFICATION 
TYPE ASSUMED, 
COLUMN 6 

The specification causing this message has a blank in 
column 6, so the specification type is not known. How- 
ever, column 7 contains an A or O and the previous 
specification was an include or omit specification (I or 
O in column 6). Therefore, the sort program assumes 
that this specification is a record type specification and 
that the specification type is to be identical to that in 
the previous specification. If the assumption is incorrect, 
correct the specification; then resubmit the job. 



SORT-7232 S ZONE SPECIFIED-FACTOR 2 
IS NOT A CONSTANT 

A zone is specified in column 8 or an include or omit 
record type specification, but column 19 does not have 
a C specified. The specification is bypassed. Correct 
the specification; then resubmit the job. 



SORT-7234 W ZONE SPECI FIED- 

RELATIONSHIP NOT EQ 
ORNE 

A zone is specified in column 8 of the include or omit 
record type specification, but columns 17 and 18 do 
not contain EQ or NE. EQ is assumed and processing 
of the specification continues. If EQ is not the correct 
entry for columns 17 and 18, correct the specification, 
then resubmit the job. If EQ is correct, correct the 
specification to avoid this message. 
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SORT-7236 S INVALID RELATIONSHIP, 
COLUMNS 17-18 



SORT-7244 W PACKED DECIMAL-LENGTH 
EXCEEDS 8 



The specification causing this error is an include or 
omit record type specification. The relationship between 
factor 1 and factor 2, specified in columns 17 and 18, 
is not EQ, NE, LT, GT, LE, or GE. EQ is assumed. 
Correct the specification; then resubmit the job. 



SORT-7238 W INVALID FACTOR 2 TYPE, 
COLUMN 1i 

Column 19 of an include or omit record type specifica- 
tion does not contain an F (field), a C (constant), or a 
K (keyword). C is assumed; factor 2 is processed as a 
constant. Check column 19 for a missing or invalid 
entry. Correct the specification before the job is run 
again. 



SORT-724Q S UNPACKED DECIMAL- 
LENGTH EXCEEDS 16 

The specification causing this error contains a U in 
column 8 indicating unpacked decimal. Columns 8 
through 12 and 13 through 16 define a factpr 1 
field that is longer than the allowable 16 bytes. A 
length of 16 is assumed. Check the To and From 
columns to determine the error. Correct the error 
before the job is run again. 



SORT-7242 W ZONE SPECI F I ED-LENGTH 
EXCEEDS 1 

The specification causing this error is an include or 
omit record type specification that has a Z in column 8. 
In this case, factor 1 must be one byte long, but it is 
not A length of one is assumed and the constant in 
column 20 of the specification is processed. Correct the 
specification before the job is run again. 



A packed field is specified (P in column 8), but the 
field length is more than 8. A packed field can be only 
8 columns long. A field length of 8 is assumed and the 
rightmost eight bytes of the field are used for the 
include or omit. If column 19 contains a C, the constant 
in columns 20 through 35 of the specification is used as 
factor 2. Correct the specification before the job is 
run again. 



SORT-7246 W INVALID FIELD TYPE 

SPECIFICATION, COLUMN 7 

The specification causing this error is a field 
specification, but column 7 does not contain an F, N, 
O, D, or S. An entry of N (normal control field) is 
assumed if there are no previous data or summary data 
field specifications for this include set. Otherwise, an 
entry of D (data field) is assumed. Correct the 
specification before the job is run again. 



SORT-7248 S I LLEGAL FORCE-ALL 
CONTINUATION 

The specification causing this error, is a field specifica- 
tion for a force-all specification (F in column 7). This 
specification should follow a conditional force specifica- 
tion, but it does npt. The specification is ignored. 
Correct the specification; then resubmit the job. 



SORT-725Q S FIELD STATEMENTS IN 

WRONG LOGICAL ORDER 

The specification causing this error is a control field 
specification that follows a data (D) or summary (S) 
specification in this include set. All control field 
specifications (N, 0, or F in column 7) must precede 
any data or summary data field specifications. This 
specification is bypassed and the next specification is 
processed. The specification might be misplaced or 
specified incorrectly. Correct the specification; then 
resubmit the job. 
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SORT-7252 S 



CONTROL FIELD LENGTH 
EXCEEDS HEADER VALUE 



SORT-7262 S DATA LENGTH EXCEEDS 
HEADER VALUE 



The accumulated total of the control field lengths in this 
include set exceeds the value specified in the header line. 
The remaining specifications in the include set are pro- 
cessed. Check the length specified in the header line 
against the specified control fields. Correct the errors; 
then resubmit the job. 



SORT-7254 W CONTROL FIELD LENGTH 

LESS THAN HEADER VALUE 

All control field specifications for this include set were 
processed, and the accumulated length of control fields 
is less than the value specified in the header line. The 
remaining positions are filled with hex zeros. Check the 
length specified in the header line against the specified 
control fields. Correct any errors before the job is run 
again. 



SORT-7256 S CHARACTER FIELD 

SPECIFICATION LENGTH 
EXCEEDS 256 

A length greater than 256 is specified in a character field 
specification (C in column 8). The rest of the sequence 
specifications are processed. Check the character field 
specifications. If you require more than 256 positions 
of data, divide the field into two or more field specifica- 
tion statements. Correct the error; then resubmit the job. 



SORT-7258 S TO OR FROM FIELD NOT 
WITHIN INPUT RECORD 

Either one or both of the specifications in the To or 
From columns are zero or contain a value larger than the 
input record length. Make sure the correct input file was 
specified and the To and From columns contain the 
correct values. Correct the error; then resubmit the job. 



A SORTR or SORTRS job is being processed and the 
data field specifications (FD or FS in columns 6 and 7) 
for this include set exceed the value in the header line. 
An error exists in either the output record length in the 
header line or in the To and From fields in the field 
description lines. If you are dropping the control field 
(X in column 28 of the header line), the data length is 
the output record length (columns 29 through 32 of the 
header line). If you are not dropping the control field, 
the control field length (columns 13 through 17 of the 
header line) must be subtracted from the output record 
length to determine the data field length. Correct the 
error; then resubmit the job. 



SORT-7264 W SPECIFICATION IN WRONG 
NUMERICAL ORDER 

Columns 1 through 5 of each sequence specification 
statement are used to order the specifications. One or 
more of the specification statements in this job has a 
value in columns 1 through 5 that is less than the value 
in the preceding specification statement. On the source 
listing, an S is printed to the left of the specification 
statements that are out of order. To avoid this error, 
correct the entries in columns 1 through 5 of the 
sequence specifications so that no entry is less than 
that on the previous specification statement. 



SORT-7266 S FACTOR 1 LENGTH 
EXCEEDS 256 

The specification causing this error is an include or omit 
specification for character data (C in column 8). Factor 
2 is a field (F in column 19) and the length of factor 1 is 
greater than 256, the maximum length. The sort program 
assumes a length of 256 for factor 1. If the length of 
factor 1 must be more than 256, divide this specification 
into two specifications with an AND continuation line 
(A in column 7); then resubmit the job. 
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SORT-7268 W P OR U FACTOR 1 USED 
WITH ALTSEQ 



SORT-7280 W NUMBER OF SUMMARY 
FIELDS INCONSISTENT 



An include or omit record type specification specifies a 
packed or unpacked factor 1, but the header line specifies 
an alternate collating sequence. The sort program 
changes factor 1 and factor 2 as the ALTSEQ specifica- 
tions indicate. This change can affect the units position 
(and the sign) of an unpacked decimal number or any 
one position of a packed decimal number. As a result, 
the desired records might not be included or omitted. 
Do not specify P or U in column 8 of the record type 
entries when you specify an alternate collating sequence. 



SORT-7276 W MORE THAN ONE SUMMARY 
V FIELD IN INCLUDE SET 

This is a SORTRS job. The specification causing the 
error specifies a summary V field (FSV in columns 6 
through 8), but at least one other summary V field was 
already specified for this include set. The statement 
in error is assumed to specify a data V field (FDV in 
columns 6 through 8). To avoid this error, change the 
extra summary V fields to data V fields. 



SORT-7278 W SUMMARY V OR DATA 
FIELD INCONSISTENT 

This is a SORTRS job. The specification causing the 
error is a summary data field specification (S in column 
7). To determine which of the following conditions is 
true, compare this specification with the first include set 
having S specifications: 

— The number of S specifications prior to this 
specification differs. 

— The length of this S specification differs. 

— The substitution character of the V specification 
differs. 

— The relative location of the specification within 
the output record differs. 

The S specifications of the first include set containing 
S specifications define the summary field positions. 
Correct the specifications; then resubmit the job. 



This is a SORTRS job. The number of S specifications in 
this include set is different from the number of S specifi- 
cations in the first include set. The S specifications of the 
first include set with S specifications form the summary 
output record. To avoid this error, correct the include 
sets so they all have the same number of S specifications. 



SORT-7282 W NO SUMMARY SPECIFICA- 
TIONS-SUMMARY SORT 

The header line specifies that this is a SORTRS job, 
but there are no summary data field specifications. 
All records with duplicate control fields are eliminated 
from the output file. Check the job type to be sure 
that a SORTRS job was intended. 



SORT-7284 W SUMMARY SPECIFICATIONS 
IGNORED 

This is a SORTR job; consequently, no summary data 
field specifications (FS in columns 6 and 7) were 
expected. However, at least one was found. All S 
specifications are treated as data specifications (D in 
column 7). Make sure this should be a SORTR job. 
If not, correct the specifications; then resubmit the job. 



SORT-7286 S TOO MANY SUMMARY DATA 
FIELDS 

This is a SORTRSJob. More than 24 summary data 
fields were specified (FS in columns 6 and 7 and C, D, 
P, or U in column 8). Limit the number of summary 
data fields to 24 or less. 
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SORT-7288 W INVALID SUMMARY 
SPECIFICATION- 
COLUMNS 20, 21, 22 

The overflow field length in columns 20 through 22 is 
incorrect because it is: 

— An invalid entry 

— Not right-justified 

— Less than the field length given by the To and 
From entries 

The entry is assumed blank. If a valid entry was 
intended in columns 20 through 22, correct the entry; 
then resubmit the job. 



SORT-7391 T MAIN STORAGE TOO SMALL 

The amount of main storage assigned to the sort program 
is not large enough to process this job. The job cannot 
be run. Make sure: 

— The correct input file was specified. 

— If this is a SORTR or SORTRS job, the output 
length specified in the header line is correct. 

— The total number of bytes reserved for the 
sequence specifications does not exceed the 
recommended amount (see Chapter 6, 
Performance Considerations). 

— There are no entries in columns 35 through 39 
of the header line. 

— Correct the errors; then resubmit the job. 



SORT-7395 T NOT ENOUGH SPACE FOR 
WORK FILE 

The sort program was attempting to automatically 
allocate space for the work file, bu^not enough space 
is available on the disk. Make space available for the 
work file by reorganizing the disk or by deleting any 
unnecessary files and then reorganizing the disk. Use 
the COMPRESS procedure to reorganize the disk. This 
places all the unused space in one contiguous area on the 
disk. You can use the SAVE procedure to save copies of 
files being deleted. Delete files by using the DELETE 
procedure. You can use the CATALOG procedure to 
display the present disk VTOC. For further information 
about these procedures, see the IBM System /32 System 
Control Programming Reference Manual, GC21-7593. 



SORT-7398 T WORK FILE SIZE NOT 
USABLE 

The work file size specified on the //FILE NAME-WORK 
statement is not large enough. Increase the specified 
work file size; then resubmit the job. 



SORT-7401 I JOB COMPLETED 

GENERATION PHASE 

The generation phase is complete. All statements were 
checked for errors. If severe or terminal errors were 
found during generation, sort operator message SORT- 
7725 is displayed; if only warning errors were found, 
sort operator message SORT-7722 is displayed. If no 
errors were found, the job proceeds to the execution 
phase. For an explanation of the sort operator messages, 
see Sort Operator Messages in the IBM System /32 
Displayed Messages Guide, GC21 -7704. 



SORT-7402 I NO ERRORS FOUND 

No errors were found during the generation phase of the 
job. Processing continues with the execution phase. 



SORT-7403 I OPERATOR CHOSE TO 
CANCEL JOB 

At the end of the generation phase, sort operator message 
SORT-7722 was displayed and the operator canceled the 
job. For an explanation of the sort operator messages, 
see Sort Operator Messages in the IBM System /32 
Displayed Messages Guide, GC2 1-7704. 



SORT-7404 I OPERATOR CHOSE TO 
CONTINUE JOB 

At the end of the generation phase, sort operator message 
SORT-7722 was displayed and the operator continued 
the job. For an explanation of the sort operator mes- 
sages, see Sort Operator Messages in the IBM System/32 
Displayed Messages Guide, GC2 1-7704. 
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SORT-7422 A XXX WARNING ERRORS 
HAVE BEEN FOUND 



SORT-7452 I XXXX BYTES-WORK FILE 
RECORD LENGTH 



During the generation of this job, no severe or terminal 
errors were found. However, a number of warning errors 
were found that could affect the execution of the job. 
Statements entered or specified incorrectly probably 
caused the errors. Sort operator message SORT-7722 is 
issued after this message. For an explanation of the sort 
operator messages, see Sort Operator Messages in the 
IBM System/32 Displayed Messages Guide, GC21 -7704. 



SORT-7423 A PERMANENT ERROR 

READING SPECIFICATIONS 

A disk error occurred while the sequence specifications 
were being read. Sort operator message SORT-7723 is 
issued after this message. For an explanation of the sort 
operator messages, see Sort Operator Messages in the 
IBM System/32 Displayed Messages Guide, GC21 -7704. 



SORT-7425 A SEVERE AND/OR TERMINAL 
ERRORS FOUND 

Severe and/or terminal errors occurred during the genera- 
tion of this job. Sort operator message SORT-7725 is 
issued after this message. For an explanation of the sort 
operator messages, see Sort Operator Messages in the 
IBM System /32 Displayed Messages Guide, GC21 -7704. 



This message indicates the record length used for the 
work file. The record length is computed from the 
information in the header line. 



SORT-7453 I XXXX BYTES-OUTPUT 
RECORD LENGTH 

This message indicates the record length of the output 
file. The record length is computed from the informa- 
tion in the header line. 



SORT-7461 I XXXX BYTES- 

SELECT/BUILD ROUTINE 

This message indicates the number of bytes in main 
storage occupied by the sequence specifications 
(including any alternate collating statements). 



SORT-7462 I XXXX SEQUENCE SPECIFI- 
CATION STATEMENTS 

This message indicates the number of sequence specifica- 
tions that the generation phase processed for this job. 



SORT-7450 I XX, XXX MAIN STORAGE 
BYTES ASSIGNED 

This message indicates the amount of main storage 
assigned for the sort program. 



SORT-7600 I 



INITIAL PHASE STARTED 



The execution phase of the job began. Records are being 
read from the input file and written to the work file in 
intermediate strings. 



SORT-7601 I #XX PASS COMPLETED 

SORT-7451 I XXXX BYTES-INPUT 

RECORD LENGTH Pass XX was completed successfully. The first pass is 00, 



the second pass 01 , and so on. 



This message indicates the input record length. 
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SORT-7602 I XXXXXX INPUT RECORDS 
WERE READ IN 



SORT-7692 I XXXXXX SORTED RECORDS 
PLACED ON OUTPUT FILE 



This message indicates the number of input records read 
for your job. 



The last pass of the sort is complete. This message 
indicates how many output records were sorted and 
placed on the output file. 



SORT-7603 I XXXXXX RECORDS WERE 
SELECTED TO BE SORTED 

This message indicates how many input records will be 
sorted. 



SORT-7620 A NO INPUT RECORDS WERE 
SELECTED TO BE SORTED 

None of the input records met the include requirements 
of the sort sequence specifications. Check the specifica- 
tions or input records that were specified. Sort operator 
message SORT-7724 is issued after this message. For 
an explanation of the sort operator messages, see Sort 
Operator Messages in the IBM System/32 Displayed 
Messages Guide, GC2 1-7704. 



SORT-7693 A NO INPUT RECORDS FOUND 

No records are in the input file. If the job is continued, 
a null output file is created. Make sure the correct input 
file was specified and that the file contains the desired 
records. Sort operator message SORT-7724 is issued 
after this message. For an explanation of the sort 
operator messages, see Sort Operator Messages in the 
IBM System /32 Displayed Messages Guide, GC2 1-7704. 



SORT-7694 I XX PASSES REMAINING 

This message indicates the number of passes left for 
this job. 



SORT-7681 T WORK RECORD COUNT IN 
ERROR 

This message indicates an error in the sort program. 
Contact IBM for program support services. 



SORT-7690 I SORT STARTING FINAL 
PASS 

The final pass of the job began. Records are being 
written on the output file. 



SORT-7691 I FINAL PASS SUCCESSFULLY 
COMPLETED 

The final pass of the job was completed with no errors. 



SORT-7695 I XXXX BLOCKS USED FOR 
WORK FILE 

This message indicates the number of blocks that were 
used for the work file. 

SORT-7901 I ****** NORMAL EOJ ****** 
The sort job was completed. 

SORT-7902 I ******ABNORMAL EOJ****** 

Errors prevented the sort job from being run to normal 
completion. 
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SORT-7928 A 



INPUT FILE READ ERROR 



SORT-7931 A WORK FILE TOO SMALL 



A disk error occurred while reading records from an 
input file. Sort operator message SORT-7728 follows. 
For an explanation of the sort operator messages, see 
Sort Operator Messages in the IBM System/32 Displayed 
Messages Guide, GC2 1 -7 704 . 



SORT-7929 A WORK Fl LE READ/WRITE 
ERROR 

A disk error occurred while reading or writing records 
on the work file. Sort operator message SORT-7729 is 
issued after this message. For an explanation of the sort 
operator messages, see Sort Operator Messages in the 
IBM System/32 Displayed Messages Guide, GC21 -7704. 



The sort work file is full. See the description of sort 
operator message SORT-7731 . Sort operator message 
SORT-7731 is issued after this message. For an explana- 
tion of the sort operator messages, see Sort Operator 
Messages in the IBM System/32 Displayed Messages 
Guide, GC21 -7704. 



SORT-7932 A OUTPUT FILE TOO SMALL 

The sort output file is full. See the description of sort 
operator message SORT-7732. Sort operator message 
SORT-7732 is issued after this message. For an explana- 
tion of the sort operator messages, see Sort Operator 
Messages in the IBM System/32 Displayed Messages 
Guide, GC21-7704. 



SORT-7930 A OUTPUT FILE WRITE 
ERROR 

A disk error occurred while the sorted records were 
being written on the output file. Sort operator message 
SORT-7730 is issued after this message. For an explana- 
tion of the sort operator messages, see Sort Operator 
Messages in the IBM System/32 Displayed Messages 
Guide, GC21-7704. 
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Appendix F. Glossary 



ADDROUT sort: The type of sort where the output con- 
sists of record addresses in the input file. 

alphabetic character: Letters A through Z and special 
symbols #, $, and @. 

alphameric character: The alphabetic characters defined and 
numeric characters 0-9. 

block: A predefined unit of storage space for files on the 
disk. For example, 1 block = 2560 bytes. 

byte: The representation of a character by eight binary 
digits; the amount of storage required for one EBCDIC 
character. 

conditional force: The control field character is replaced 
before the record is sorted, only if the control field in the 
input record contains a particular entry. 

constant: Data that does not change during execution of 
a program. 

control field: One or more specified fields that are com- 
pared to determine the record sequence in the output file. 

data: A collection of facts, numbers, letters, and symbols 
that can be processed by a computer. 

data field: See field. 

execution phase: The part of the sort program that gets 
the records you want to sort, sorts the records, and writes 
the sorted records onto the output file. 

field: One or more adjacent record positions that contain 
related information. 

file: An organized collection of related records. 

file description: The specification for the arrangement of 
fields within a record and records within a file. 

forced control field: A one-position control field that 
results from replacing the value or adding a value. 



generation phase: The part of the sort program that trans- 
lates the sequence specifications into machine language. 

input: Data transferred to computer storage for processing. 

integer: A whole number stored in hexadecimal (binary) 
form. 

keyword: A nonvariable character string in sequence 
specifications (such as UDATE). 

library: An area on disk that contains procedure members, 
source members, load members, and subroutine members 
as well as areas required by the system control program. 
For example, sort is stored in the library. 

normal control field: Any control field that is specified by 
an N in column 7 of the field sequence specifications. 

OCL: Operation control language. 

OCL statement: A statement that identifies the job and its 
processing requirements to the control program. 

offline multivolume file: A multivolume file that is pro- 
cessed in segments by the system. Each segment is pro- 
cessed before the next segment is copied to disk. A segment 
consists of the information on one diskette. 

opposite control field: Any control field that is specified 
by an 0 in column 7 of the field sequence specifications. 

output: Data transferred from computer storage to printed 
form, disk, or to the display screen. 

output file: File resulting from the sort. 

overflow field: In a summary tagalong sort, the field that 
allows for anticipated field expansion. 

packed data field: Each byte within a field represents two 
numeric digits except the low-order byte, which contains 
the sign. For non low-order bytes, bits 0-3 for one digit; 
bits 4-7 for one digit. 

procedure: A named collection of related OCL statements, 
and possibly control statements that perform a particular 
task. 
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procedure member: A procedure stored in the library. 

program date: The date associated with a program (job 
step). 

real number: A number stored in IBM System/360 
floating-point format, in which the leftmost byte contains 
the sign and exponent (decimal location) and the remaining 
bytes contain the fraction or mantissa in left-justified 
binary form. 

record: A collection of related data, treated as a unit. For 
example, one line of an invoice might form a record. 

relative record number: In a direct file, the location of a- 
record in relation to the beginning of the file. 

right-justify: The placement of data in a field with the 
last significant byte in the rightmost position. 

sequence specification: Defines the arrangement of a file. 



source member: A collection of records used as input to a 
program such as RPG II specifications or sort sequence 
specifications. Source members are stored in the library. 

summary data field: In a summary tagalong sort, a data 
field designated for accumulated totals. 

summary tagalong sort: A type of sort that arranges 
records by a specified control field and accumulates totals 
from specified fields within those records. 

tagalong sort: A type of sort that arranges records by a 
specified control field and includes other specified data 
fields in the output. 

unpacked data field: Each byte within a field represents 
one numeric digit. Bits 0 through 3 are reserved for the 
sign; bits 4 through 7 are the numeric portion. 

work file: An area reserved on the disk for temporary 
storage of the data being sorted. 
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*to indicate comments on field line 33 

* to indicate comments on record type lines 20 



action message (A) 

printed by the sort program 15 
address out (addrout) sort, definition and function 2 
addrout sort (SORTA) (see SORTA) 
alphameric constants, as factor 2 (columns 20-39— 

record type specifications) 27 
alphameric data 

affect on column 8 record type entry 22 

as affected by column 8 record type entry 21 
alternate collating sequence 

affect on factor 1 and factor 2 comparison 26 

affect on sort time 57 

ALTSEQ statement use 86 

indicated on header line (column 26) 14 

restrictions on using column 8 record type entries 86 
ALTSEQ statements 

examples of 87 

how to code 86 

placement in sequence specifications 87 

programming considerations 87 
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AND lines 

definition 20 

describing a record type 19 

describing additional factor 1 fields 25 

in include sets 19 

in omit sets 20 
automatic work file allocation 51 

effect on sort time 58 
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record selection based on values 100 
binary (interger) number sorting 93 
binary values 

include sequence 100 



C/Z/D/P/U/V (column 8— field specifications) 
affect on your sorted file 35 
what it tells sort 35 



C/Z/D/P/U (column 8— record type specifications) 
affect on factor 1 length (columns 9-16) 25 
restrictions when using alternate collating 

sequence 21 
to indicate packed or unpacked data 21 
to indicate portions of characters to compare 21 
to indicate records you want to sort 21 
when factor 1 and factor 2 contain alphameric data 
with signed and unsigned data 22 

calculating file size 83 

character overflow indicator field (column 17 field 

specifications) 40 
characters 

in compare operations 21 

representation within the computer 22 
collating sequence (column 26— header specification) 

alternate 86 

specified for compare operations 14 
standard 86 
table of 85 
column(s) 

1-2 (page number) 

field specifications 32 

header specification 14 

record type specifications 18 
3-5 (line number) 

field specifications 32 

header specification 14 

record type specif ications 18 
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6 (line type) 

field specifications 32 
header specification 14 
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19 
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specifications 48 
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27 (print option), header specification 15 

28 (output option), header specification 15 
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34 (nonverify option), header specification 1 5 
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40-72 (comments) 

field specifications 50 
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40-72 (job description) , header specification 1 6 
comment line 

field specifications 33 
record type specifications 20 
comments (columns 40-72— field 

specifications) 50 
comments (columns 40-72— record type specifications), 

to describe record types 29 
compare operations 

affected by column 8 of record type specifications 21 
affected by column 19 of record type 

specifications 26 
affected by columns 17-18 of record type 
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conditional force 
explanation of 33 
using a force-all line 47 
using normal or opposite and forced control 

fields 45 
using only forced control fields 44 
conditionally forced character (column 17— field 
specifications) 
examples 44 
how to define 41 

used to assign value to summary overflow field 36 
what it tells sort 40 
constant 

as factor 2 (columns 20-39— record type) 27 

indicated by column 19 of record type specifications 26 

length when used as factor 2 on record type 

specifications 27 
position when used as factor 2 on record type 

specifications 27 
positioning sign in numeric constants 28 
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to further describe the same record type 20 
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forced 33 
26 how order affects sort time 58 

how to drop 1 5 
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opposite 33 

packed or unpacked 36 

specifying use by sort 33 
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types of 33 

when to drop 36 
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representation within the computer 22 

used in compare operations 21 
data and control fields, when and how to desribe one 

field as both 15 
data fields 

definition 33 

describing on field specifications line 33 

number of when two or more record types 33 

total lengths when two or more record types 33 
data fields, summary (see summary data fields) 
defining 

conditional force characters 41 

force-all characters 41 

unconditional force characters 41 
diagnostic messages 15 
digit portion of system character 22 
dropping control fields 

how to do 1 5 

when to do 36 
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examples of summary sort jobs 75 
examples of using forced control fields 43 
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changed by ALTSEQ statements 87 
coding rules 25 
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describing more than one factor 1 field 25 
how length affected by column 8 entry 25 
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to identify included or omitted records 25 
factor 2 (columns 20-27 or 20-39— record type specifications) 
changed by ALTSEQ statements 87 
coding the sign in packed and unpacked numeric 
constants 28 
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length of factor 2 constant 27 
length of factor 2 field 26 
rules for coding 26 
factor 2 field (columns 20-27— record type specifications) 
coding rules 26 
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relationship to factor 1 field 26 
field specifications 

as part of include set 19 
column summary 31 
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1-2 (page number) 32 

3-5 (line number) 32 
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7 (field type or comments) 32 

8 (C/Z/D/P/U/V) 35 
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13-16 (to) 39 

17 (conditionally forced character) 40 
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what they describe for summary sorts 32 

what they describe for tagalong sorts 32 

what they tell sort 31 
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specifications) 40 
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to identify location of field in input record 39 
field, constant, or keyword (column 19— record type 
specifications) to determine if factor-2 is constant, 
field, or keyword 26 
field type or comments (column 7— field 

specifications) 33 
file allocation, automatic work 51 
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input file 51 

output file 51 

work file 51 
file information 51 

running your own procedures 53 
file input overlay considerations 52 
file location on disk, affect on sort time 58 



file programming considerations 52 

Fl LE statement when running your own procedures 53 

force-all 

explanation 34 

result if not used 41 

used after conditional force lines 34 
force-all character 

example of 47 

how to define 41 
forced character (column 18— field specifications) 

used to initialize summary overflow field 41 

when and how character is forced 40 
forced control fields 

examples 43 

rules for using 36 

types 33 

when to use 33 
format of records 

affect on order of sequence specifications 8 

definition 8 
from entry (columns 9-12— field specifications) 

describing one character field 40 

to indicate first position of field in input record 39 
from entry (columns 9-12— record type specifications) to 

indicate first position of factor 1 in input record 25 
from entry (columns 20-23— record type specifications) to 
indicate first position of factor 2 field in input record 26 



header specification 

column summary 13,89 
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1-2 (page numbers) 14 

3-5 (line number) 14 

6 (line type) 14 

7-12 (job) 14 

13-17 (largest sum of control field lengths for any 

record type) 14 
18 (sequence) 14 

26 (collating sequence) 14 

27 (print option) 15 

28 (output option for SORTR) 15 

29-32 (output record length for SORTR ) 15 

34 (nonverify option) 16 

36 (null output) 16 

40-72 (job description) 16 
columns that you must fill in 13 
explanation of coumn entries 13 
what they tell sort 13 
how sort works 5 



include line, to select records to sort 18 
include sequence, binary values 100 
include set 

definition 19 

mixing with omit sets 20 

rules for using 19 

when to use 20 
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implied 8 

to sort records that have not been included or omitted 18 
initializing an overflow field 48 
input file 

calculating storage tracks for 83 

characteristics 51 

how its position on disk affects sort time 58 
overlay considerations 52 
programming considers Jons 51,52 
running your own procedure 53 
input required to run a sort job 5 

input sequence specifications, order when using ALTSEQ 87 
input to sort, file types that you can sort 5 
integer (binary) number sorting 93 
integer example of sorting positive 93 



job (columns 7-12— header specification), to specify 

the type of sort 14 
job description (columns 40-72— header specification), to 

supply comments 16 



negative integar, example of sorting 95 
negative real number, example of sorting 98 
nonverify option (column 34— header specif ication) 16 

timing considerations 58 
normal control field 

changed by ALTSEQ statements 87 

definition 33 

how sort uses 32 
number of records 

affect on order of the sequence specifications 8 

affect on sort time 57 
number of sequence specifications, affect on sort 
time 57 

numeric constants, coding negative constants 28 
numeric data 

data formats and column 8 entry combinations 22 
defined by column 8 record type entry 23 
definition of types 22 
explanation of positive and negative (signed) 

numeric data 27 
indicated by column 8 of record type specifications 21 
packed numbers 23 
unpacked numbers 23 
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largest sum of control field lengths for any record 
type (columns 13-17— header specification), calculating 
entry 14 

length 

factor 1 of record type specifications 25 
factor 2 constant (columns 20-39— record type 

specifications) 27 
factor 2 field (columns 20-27— record type 

specifications) 26 
factor 2 keyword (columns 20-39— record type 

specifications) 29 
maximum field length for columns 7-8 (field 

specifications) 38 
line number (columns 3-5) with page number 
(columns 1-2) for sequencing 
field specifications 32 
header specif ication 14 
record type specifications 18 
line type (column 6) 

to identify field line (field specifications) 32 
to identify header line (header specification) 14 
to identify include line (record type 

specifications) 18 
to identify include-all line (record type 

specifications) 18 
to identify omit line (record type specifications) 18 



OCL statements 
ways to enter 51 
what they tell about sort 53 
what they tell about the input file 53 
what they tell about the ouput file 54 
what they tell about the sequence specifications 54 
what they tell about the work file 53 

omit line 

to exclude records from your sort 18 

when and how to use 18 
omit set 

definition 19 

mixing with include set 20 

rules for using 19 

types 20 

when to use 20 
opposite control field 

changed by ALTSEQ statements 87 

column 8 field description entry when sorting 
different record types 35 

definition 33 

how sort uses 32 

when to use 35 
OR lines 

definition 20 

describing different record types 19 
in include sets 19 
in omit sets 20 



messages 

sort programmer 105 

types printed by the sort program 1 5 
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order of sequence specifications 

affected by number and format of records 8 

normal order 8 
out-of-sequence lines 

how to insert in field specifications 32 

how to insert in record type specifications 18 
output 

addrout sort 2 

summary tagalong sort 4 

tagalong sort 3 
output file 

calculating storage tracks for 83 

characteristics 51 

how position on disk affects sort time 58 
programming considerations 51 , 52 
running your own procedure 54 
output option for SORTR (column 28— header specification) 

to drop control fields in tagalong (SORTR) sorts 1 5 
output record length for SORTR (columns 29-32- 
header specification) 
calculating when dropping control fields 15 
calculating when not dropping control fields 15 
overflow field length entry (columns 20-22— field 

specifications) 48 
overflow indicator field 

how to define (columns 7-8— field 

specifications) 41 
how to initialize (column 18— field 

specifications) 49 
when to use 49 
overview of sort 1 
addrout sort 2 
summary tagalong sort 4 
tagalong sort 3 



real number sorting 93 

real number example of sorting 93 

record selection based on binary values 100 

record size 

affect on sort time 57 

calculating for tagalong (SORTR) sort 15 
record type specifications 

column summary 17 

column(s) 

1-2 (page number) 18 
3-5 (line number) 18 

6 (line type) 18 

7 (continuation or comments) 20 

8 (C/Z/D/P/U) 21 

9-16 (factor 1 location) 25 
17-18 (relation) 26 
19 (field, constant, or keyword) 26 
20-27 (factor 2 field) 26 
20-39 (factor 2 constant) 27 
20-39 (factor 2 keyword) 29 
40-72 (comments) 29 
columns you must fill in 17 
explanation of column entries 17 
what they tell sort 1 7 
when not required 1 7 
record types 

described in include set 19 
described in omit sets 20 
records, how number of affects sort time 57 
relation (columns 17-18— record type specifications) 
affect on omitting or including records 26 
to specify factor 1 and factor 2 comparison 26 
relative record numbers, addrout output 2 
replacements for more than one character (column 19— field 

specifications), when and how to indicate 42 
running time, sort job 52 



packed numeric data 

number of bits in each digit 23 
position of sign code 24 
possible positive and negative sign codes 23 
packed, unpacked, opposite character, or opposite 

zone control fields 36 
page number (column 1-2)— with line number (columns 

3-5) for sequencing (see line number) 
positive integer, example of sorting 93, 95 
positive real number, example of sorting 93, 98 
print option (column 27— header specification), 

information sort can print 15 
procedures 

entering through a keyboard 55 
executing from disk 55 
running your own 53, 55 
program date 
column(s) 

8 (C/Z/D/P/U) 21 
9-16 (factor 1 location) 25 
17-18 (relation) 26 
19 (field, constant, or keyword) 26 
20-39 (factor 2 keyword) 29 
programmer messages for sort 105 
programming considerations for using sort 52 
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using addrout (SORTA) and tagalong (SORTR) 

sorts 61 
using signed control fields 80 
using summary (SORTRS) sort 75 
sequence 

changing collating sequence of one character 87 

changing collating sequence of several characters 87 

standard and alternate collating 86 
sequence (column 18— header specification), to 

indicate record sequence 14 
sequence error message 

field specifications 32 

header specif ication 14 

record type specifications 18 
sequencing 

on field specifications 32 

on header specification 14 

on record type specifications 18 

using control fields 36 



Index 125 



Page of SC2 1-7633-2 
Issued 30 May 1980 
ByTNL: SN2 1-8090 



sequence specifications 

for a summary tagaiong sort (SORTRS) 1 1 
for a tagaiong sort (SORTR) 10 
for an addrout sort (SORTA) 9 
how number of affects sort time 57 
inserting new ones in field lines 32 
inserting new ones in record type lines 18 
normal order 8 
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examples of summary sorts 75 
types 2 
sort program 
execution 7 
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functions 1 
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interaction with input, work, and output files 7 
operation 7 

output considerations 52 

procedures stored on disk, executing 55 

programmer messages 55 

sequence specifications 6 
sort time 52 
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affected by number of records 57 

affected by number of sequence specifications 57 

affected by order of control fields 58 

affected by record size 57 

affected by using alternate collating sequence 57 

affected by using automatic work file 
allocation 58 
SORTA (addrout sort) 

contents of sorted records 2 

example 65 

input file overlay 52 

sequence specifications 51 

using summary data fields 34 
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SORTR (tagaiong sort) 

calculating output record length when dropping 

control fields 15 
calculating output record length when not dropping 

control fields 1 5 
contents of sorted records 3 
function 3 

sequence specifications that you use 10 
using summary data fields 34 
SORTRS (summary sort) 

contents of sorted records 5 

examples 75 

input file overlay 52 

output 4, 52 

running time 52 

sequence specifications that you use 11 

using overflow indicator fields 49 

using summary data fields 34 

work file size 52 
source member information when running your own 
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SOURCE statement when running your own procedure 
specifications, sort sequence 6 
standard collating sequence 
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table 85 
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summary data f ields 

how overflow indicated 49 

how to define 34 
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summary overflow field 

how to define 41 

how to initialize 49 
summary sort (SORTRS) (see SORTRS) 
summary sort overflow 49 
summary tagaiong sort (see SORTRS) 
system data 
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how characters represented with the computer 22 
how signed numeric constants represent on record 

type specifications 27 
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numeric data 23 
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tagaiong sort (SORTR) (see SORTR) 
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time to sort a file 52 

affected by alternate collating sequence 57 

affected by file location on disk 58 

affected by number of input records 57 

affected by number of sequence specifications 57 

affected by order of control fields 58 

affected by size of records 57 
to entry (columns 13-16— field specifications) 
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to indicate last position of field in input record 39 
to entry (columns 24-27— record type specification), 
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types of sort 2 
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example 43 

explanation 30 
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position of the sign code 24 
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automatic allocation 51 
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